Beautifying Selection

[srvgit] / reports-home.pl

diff --git a/reports-home.pl b/reports-home.pl
index 602df13..a220183 100755 (executable)
--- a/reports-home.pl
+++ b/reports-home.pl
@@ -4,6 +4,7 @@ use strict;
 use CGI;
 use C4::Auth;
 use C4::Output;
+use C4::Interface::CGI::Output;
 use C4::Context;
 use HTML::Template;
 
@@ -13,7 +14,7 @@ my ($template, $loggedinuser, $cookie)
                                query => $query,
                                type => "intranet",
                                authnotrequired => 0,
-                               flagsrequired => {permissions => 1},
+                               flagsrequired => {catalogue => 1},
                                debug => 1,
                                });
-print $query->header(-cookie => $cookie),$template->output;
+output_html_with_http_headers $query, $cookie, $template->output;