X-Git-Url: http://koha-dev.rot13.org:8081/gitweb/?a=blobdiff_plain;f=C4%2FAuth.pm;h=ffee1bbcd84f93c15d182d21e22ec0842185ecff;hb=47fac215afbedab7bdad9172d1f002488cd35df1;hp=0b737e774bffa882b1b5cbe6232631bc34840d07;hpb=0c40ff9f9814295fe27f52047bfbe4ef7b47e78b;p=koha_gimpoz diff --git a/C4/Auth.pm b/C4/Auth.pm index 0b737e774b..ffee1bbcd8 100644 --- a/C4/Auth.pm +++ b/C4/Auth.pm @@ -41,8 +41,7 @@ BEGIN { if ( psgi_env ) { die 'psgi:exit' } else { exit } } - - $VERSION = 3.02; # set version for version checking + $VERSION = 3.02; # set version for version checking $debug = $ENV{DEBUG}; @ISA = qw(Exporter); @EXPORT = qw(&checkauth &get_template_and_user &haspermission &get_user_subpermissions); @@ -373,7 +372,7 @@ sub get_template_and_user { $LibraryNameTitle =~ s/<(?:\/?)(?:br|p)\s*(?:\/?)>/ /sgi; $LibraryNameTitle =~ s/<(?:[^<>'"]|'(?:[^']*)'|"(?:[^"]*)")*>//sg; # clean up the busc param in the session if the page is not opac-detail - if ($in->{'template_name'} =~ /opac-(.+)\.(?:tt|tmpl)$/ && $1 !~ /^(?:MARC|ISBD)?detail$/) { + if (C4::Context->preference("OpacBrowseResults") && $in->{'template_name'} =~ /opac-(.+)\.(?:tt|tmpl)$/ && $1 !~ /^(?:MARC|ISBD)?detail$/) { my $sessionSearch = get_session($sessionID || $in->{'query'}->cookie("CGISESSID")); $sessionSearch->clear(["busc"]) if ($sessionSearch->param("busc")); } @@ -1424,7 +1423,7 @@ sub checkpw { my ( $dbh, $userid, $password, $query ) = @_; if ($ldap) { - $debug and print "## checkpw - checking LDAP\n"; + $debug and print STDERR "## checkpw - checking LDAP\n"; my ($retval,$retcard,$retuserid) = checkpw_ldap(@_); # EXTERNAL AUTH ($retval) and return ($retval,$retcard,$retuserid); } @@ -1665,6 +1664,7 @@ sub getborrowernumber { return 0; } + END { } # module clean-up code here (global destructor) 1; __END__