Adding more sort options

[koha.git] / reports-home.pl

diff --git a/reports-home.pl b/reports-home.pl
index 422c1e7..a220183 100755 (executable)
--- a/reports-home.pl
+++ b/reports-home.pl
@@ -4,13 +4,17 @@ use strict;
 use CGI;
 use C4::Auth;
 use C4::Output;
+use C4::Interface::CGI::Output;
 use C4::Context;
 use HTML::Template;
 
 my $query = new CGI;
-my ($loggedinuser, $cookie, $sessionID) = checkauth($query);
-
-my $template = gettemplate("reports/reports-home.tmpl");
-$template->param(loggedinuser => $loggedinuser);
-
-print $query->header(-cookie => $cookie),$template->output;
+my ($template, $loggedinuser, $cookie)
+= get_template_and_user({template_name => "reports/reports-home.tmpl",
+                               query => $query,
+                               type => "intranet",
+                               authnotrequired => 0,
+                               flagsrequired => {catalogue => 1},
+                               debug => 1,
+                               });
+output_html_with_http_headers $query, $cookie, $template->output;