|
Lines 8-14
use Modern::Perl;
Link Here
|
| 8 |
use CGI qw ( -utf8 ); |
8 |
use CGI qw ( -utf8 ); |
| 9 |
use Test::MockModule; |
9 |
use Test::MockModule; |
| 10 |
use List::MoreUtils qw/all any none/; |
10 |
use List::MoreUtils qw/all any none/; |
| 11 |
use Test::More tests => 12; |
11 |
use Test::More tests => 13; |
| 12 |
use Test::Warn; |
12 |
use Test::Warn; |
| 13 |
use C4::Members; |
13 |
use C4::Members; |
| 14 |
use Koha::AuthUtils qw/hash_password/; |
14 |
use Koha::AuthUtils qw/hash_password/; |
|
Lines 112-117
$dbh->{RaiseError} = 1;
Link Here
|
| 112 |
../../../../../../../../../../../../../../../etc/passwd |
112 |
../../../../../../../../../../../../../../../etc/passwd |
| 113 |
test/../../../../../../../../../../../../../../etc/passwd |
113 |
test/../../../../../../../../../../../../../../etc/passwd |
| 114 |
/etc/passwd |
114 |
/etc/passwd |
|
|
115 |
test/does_not_finished_by_tt_t |
| 115 |
) |
116 |
) |
| 116 |
) { |
117 |
) { |
| 117 |
eval { |
118 |
eval { |
| 118 |
- |
|
|