X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=opac%2Fopac-overdrive-search.pl;h=632d2c49ee3f690478a1615cf284e2abad37f647;hb=fd9ff6a4f012399fc8408aa25ab1185d8308ea45;hp=1f8304b0fde1313a976032503e616e73fc5d6e42;hpb=c7a2ef261e4d905c3c4d61f088e1d72681305db3;p=koha.git diff --git a/opac/opac-overdrive-search.pl b/opac/opac-overdrive-search.pl index 1f8304b0fd..632d2c49ee 100755 --- a/opac/opac-overdrive-search.pl +++ b/opac/opac-overdrive-search.pl @@ -17,8 +17,7 @@ # You should have received a copy of the GNU General Public License # along with Koha; if not, see . -use strict; -use warnings; +use Modern::Perl; use CGI qw ( -utf8 ); @@ -33,7 +32,7 @@ my ($template, $loggedinuser, $cookie) query => $cgi, type => "opac", authnotrequired => 1, - flagsrequired => {borrowers => 1}, + flagsrequired => {borrowers => 'edit_borrowers'}, debug => 1, }); @@ -41,6 +40,6 @@ $template->{'VARS'}->{'q'} = $cgi->param('q'); $template->{'VARS'}->{'limit'} = C4::Context->preference('OPACnumSearchResults') || 20; $template->{'VARS'}->{'OPACnumSearchResults'} = C4::Context->preference('OPACnumSearchResults') || 20; $template->{'VARS'}->{'OverDriveLibraryID'} = C4::Context->preference('OverDriveLibraryID'); -$template->param(overdrive_error => $cgi->param('overdrive_error')); +$template->param(overdrive_error => scalar $cgi->param('overdrive_error')); output_html_with_http_headers $cgi, $cookie, $template->output;