|
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 |
- |
|
|