Lines 561-569
sub get_template_and_user {
Link Here
|
561 |
unless ( $pagename =~ /^(?:MARC|ISBD)?detail$/ |
561 |
unless ( $pagename =~ /^(?:MARC|ISBD)?detail$/ |
562 |
or $pagename =~ /^showmarc$/ |
562 |
or $pagename =~ /^showmarc$/ |
563 |
or $pagename =~ /^addbybiblionumber$/ |
563 |
or $pagename =~ /^addbybiblionumber$/ |
564 |
or $pagename =~ /^review$/ ) { |
564 |
or $pagename =~ /^review$/ ) |
565 |
my $sessionSearch = get_session( $sessionID || $in->{'query'}->cookie("CGISESSID") ); |
565 |
{ |
566 |
$sessionSearch->clear( ["busc"] ) if ( $sessionSearch->param("busc") ); |
566 |
my $sessionSearch = get_session( $sessionID ); |
|
|
567 |
$sessionSearch->clear( ["busc"] ) if $sessionSearch; |
567 |
} |
568 |
} |
568 |
} |
569 |
} |
569 |
|
570 |
|
Lines 904-909
sub checkauth {
Link Here
|
904 |
$session->delete(); |
905 |
$session->delete(); |
905 |
$session->flush; |
906 |
$session->flush; |
906 |
C4::Context::_unset_userenv($sessionID); |
907 |
C4::Context::_unset_userenv($sessionID); |
|
|
908 |
$sessionID = undef; |
907 |
} |
909 |
} |
908 |
elsif ($logout) { |
910 |
elsif ($logout) { |
909 |
|
911 |
|
Lines 914-919
sub checkauth {
Link Here
|
914 |
$session->flush; |
916 |
$session->flush; |
915 |
$cookies = clear_all_cookies($query); |
917 |
$cookies = clear_all_cookies($query); |
916 |
C4::Context::_unset_userenv($sessionID); |
918 |
C4::Context::_unset_userenv($sessionID); |
|
|
919 |
$sessionID = undef; |
917 |
|
920 |
|
918 |
if ($cas and $caslogout) { |
921 |
if ($cas and $caslogout) { |
919 |
logout_cas($query, $type); |
922 |
logout_cas($query, $type); |
Lines 951-957
sub checkauth {
Link Here
|
951 |
} |
954 |
} |
952 |
|
955 |
|
953 |
unless ( $loggedin ) { |
956 |
unless ( $loggedin ) { |
954 |
$sessionID = undef; |
|
|
955 |
$userid = undef; |
957 |
$userid = undef; |
956 |
} |
958 |
} |
957 |
|
959 |
|
Lines 1249-1254
sub checkauth {
Link Here
|
1249 |
$session->param( 'sessiontype', 'anon' ); |
1251 |
$session->param( 'sessiontype', 'anon' ); |
1250 |
$session->param( 'interface', $type); |
1252 |
$session->param( 'interface', $type); |
1251 |
} |
1253 |
} |
|
|
1254 |
$session->flush; |
1252 |
} # END unless ($userid) |
1255 |
} # END unless ($userid) |
1253 |
|
1256 |
|
1254 |
# finished authentification, now respond |
1257 |
# finished authentification, now respond |