Lines 907-919
sub checkauth {
Link Here
|
907 |
my $insecure = C4::Context->boolean_preference('insecure'); |
907 |
my $insecure = C4::Context->boolean_preference('insecure'); |
908 |
|
908 |
|
909 |
# finished authentification, now respond |
909 |
# finished authentification, now respond |
910 |
if ( $loggedin || $authnotrequired || ( defined($insecure) && $insecure ) ) |
910 |
|
911 |
{ |
911 |
# if access is via Koha's $database account - then disable login |
912 |
# successful login |
912 |
unless ( C4::Context->userenv->{'number'} == 0 ) { |
|
|
913 |
|
914 |
if ( $loggedin || $authnotrequired || ( defined($insecure) && $insecure ) ) { |
915 |
# successful login |
913 |
unless ($cookie) { |
916 |
unless ($cookie) { |
914 |
$cookie = $query->cookie( CGISESSID => '' ); |
917 |
$cookie = $query->cookie( CGISESSID => '' ); |
915 |
} |
918 |
} |
916 |
return ( $userid, $cookie, $sessionID, $flags ); |
919 |
return ( $userid, $cookie, $sessionID, $flags ); |
|
|
920 |
} |
917 |
} |
921 |
} |
918 |
|
922 |
|
919 |
# |
923 |
# |
920 |
- |
|
|