Bug 13297 - Shelving location PROC does not work according to manual

[koha.git] / reports / reports-home.pl

diff --git a/reports/reports-home.pl b/reports/reports-home.pl
old mode 100644 (file)
new mode 100755 (executable)
index bfed7a4..29d3617
--- a/reports/reports-home.pl
+++ b/reports/reports-home.pl
@@ -1,5 +1,7 @@
 #!/usr/bin/perl
 
+# Copyright Biblibre 2006
+#
 # This file is part of Koha.
 #
 # Koha is free software; you can redistribute it and/or modify it under the
@@ -11,12 +13,13 @@
 # WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
 # A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
 #
-# You should have received a copy of the GNU General Public License along with
-# Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place,
-# Suite 330, Boston, MA  02111-1307 USA
-# 
+# You should have received a copy of the GNU General Public License along
+# with Koha; if not, write to the Free Software Foundation, Inc.,
+# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+
 
 use strict;
+#use warnings; FIXME - Bug 2505
 use CGI;
 use C4::Auth;
 use C4::Output;
@@ -25,11 +28,11 @@ use C4::Context;
 
 my $query = new CGI;
 my ($template, $loggedinuser, $cookie)
-= get_template_and_user({template_name => "reports/reports-home.tmpl",
+= get_template_and_user({template_name => "reports/reports-home.tt",
                                query => $query,
                                type => "intranet",
                                authnotrequired => 0,
-                               flagsrequired => {reports => 1},
+                               flagsrequired => {reports => '*'},
                                debug => 1,
                                });
 $template->param(intranetcolorstylesheet => C4::Context->preference("intranetcolorstylesheet"),