Lines 171-179
subtest 'checkauth() tests' => sub {
Link Here
|
171 |
my ( $return ) = C4::Auth::check_cookie_auth( $sessionID, undef, { skip_version_check => 1, remote_addr => '1.2.3.4' } ); |
171 |
my ( $return ) = C4::Auth::check_cookie_auth( $sessionID, undef, { skip_version_check => 1, remote_addr => '1.2.3.4' } ); |
172 |
is( $return, 'ok', 'Former session in shape now' ); |
172 |
is( $return, 'ok', 'Former session in shape now' ); |
173 |
|
173 |
|
174 |
my $mock1 = Test::MockModule->new('C4::Auth')->mock( 'safe_exit', sub {} ); |
174 |
my $mock1 = Test::MockModule->new('C4::Auth'); |
175 |
my $mock2 = Test::MockModule->new('CGI') ->mock( 'request_method', 'POST' ) |
175 |
$mock1->mock( 'safe_exit', sub {} ); |
176 |
->mock( 'cookie', sub { return $sessionID; } ); # oversimplified.. |
176 |
my $mock2 = Test::MockModule->new('CGI'); |
|
|
177 |
$mock2->mock( 'request_method', 'POST' ); |
178 |
$mock2->mock( 'cookie', sub { return $sessionID; } ); # oversimplified.. |
177 |
my $cgi = CGI->new; |
179 |
my $cgi = CGI->new; |
178 |
my $password = 'Incr3d1blyZtr@ng93$'; |
180 |
my $password = 'Incr3d1blyZtr@ng93$'; |
179 |
$patron2->set_password({ password => $password }); |
181 |
$patron2->set_password({ password => $password }); |
180 |
- |
|
|