Bug 19532: (follow-up) Fix calls, tests, syspref settings, checks
[koha-ffzg.git] / opac / opac-routing-lists.pl
index 8e4771c..299bb29 100755 (executable)
 use Modern::Perl;
 use CGI qw ( -utf8 );
 use C4::Members;
-use C4::Auth;
-use C4::Output;
+use C4::Auth qw( get_template_and_user );
+use C4::Output qw( output_html_with_http_headers );
 use Koha::Patrons;
 
-my $query = new CGI;
+my $query = CGI->new;
 
 unless ( C4::Context->preference('RoutingSerials') ) {
     print $query->redirect("/cgi-bin/koha/errors/404.pl");
@@ -36,7 +36,6 @@ my ( $template, $borrowernumber, $cookie ) = get_template_and_user(
         template_name   => "opac-routing-lists.tt",
         query           => $query,
         type            => "opac",
-        debug           => 1,
     }
 );