From 7cdb88c56eb543b6c85eec146e733c7fb37ac6cc Mon Sep 17 00:00:00 2001
From: tipaul <tipaul>
Date: Mon, 19 May 2003 15:33:50 +0000
Subject: [PATCH] unused script (see stats.pl instead)

---
 reports.pl | 58 ------------------------------------------------------
 1 file changed, 58 deletions(-)
 delete mode 100755 reports.pl

diff --git a/reports.pl b/reports.pl
deleted file mode 100755
index d6f8c82634..0000000000
--- a/reports.pl
+++ /dev/null
@@ -1,58 +0,0 @@
-#!/usr/bin/perl
-
-# $Id$
-
-#script to display reports
-#written 8/11/99
-
-
-# Copyright 2000-2002 Katipo Communications
-#
-# This file is part of Koha.
-#
-# Koha is free software; you can redistribute it and/or modify it under the
-# terms of the GNU General Public License as published by the Free Software
-# Foundation; either version 2 of the License, or (at your option) any later
-# version.
-#
-# Koha is distributed in the hope that it will be useful, but WITHOUT ANY
-# 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
-
-use strict;
-use CGI;
-use C4::Output;
-use C4::Stats;
-use C4::Stock;
-use HTML::Template;
-
-my $input = new CGI;
-my $type=$input->param('type');
-# 2002/12/19 hdl@ifrance.com templating
-my $template=gettemplate("reports.tmpl");
-#print startpage();
-#print startmenu('issue');
-# 2002/12/19 hdl@ifrance.com templating end
-
-my @dataloop;
-if ($type eq 'search'){
- @dataloop=statsreport('search','something');
-}
-if ($type eq 'issue'){
- @dataloop=statsreport('issue','today');
-}
-if ($type eq 'stock'){
- @dataloop=stockreport();
-}
-
-# 2002/12/19 hdl@ifrance.com templating
-$template->param(	type => $type,
-								dataloop => \@dataloop);
-#print endmenu('issue');
-#print endpage();
-print "Content-Type: text/html\n\n", $template->output;
-# 2002/12/19 hdl@ifrance.com templating
-- 
2.39.5