# You should have received a copy of the GNU General Public License
# along with Koha; if not, see <http://www.gnu.org/licenses>.
-use strict;
-use warnings;
+use Modern::Perl;
use CGI qw ( -utf8 );
-use C4::Auth qw(:DEFAULT get_session);
-use C4::Output;
+use C4::Auth qw( get_template_and_user );
+use C4::Context;
+use C4::Output qw( output_html_with_http_headers );
-my $cgi = new CGI;
+my $cgi = CGI->new;
# Getting the template and auth
-my ($template, $loggedinuser, $cookie)
-= get_template_and_user({template_name => "opac-overdrive-search.tt",
- query => $cgi,
- type => "opac",
- authnotrequired => 1,
- flagsrequired => {borrowers => 1},
- debug => 1,
- });
+my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
+ {
+ template_name => "opac-overdrive-search.tt",
+ query => $cgi,
+ type => "opac",
+ authnotrequired => ( C4::Context->preference("OpacPublic") ? 1 : 0 ),
+ }
+);
$template->{'VARS'}->{'q'} = $cgi->param('q');
$template->{'VARS'}->{'limit'} = C4::Context->preference('OPACnumSearchResults') || 20;