[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] CVS: koha stats.print.pl,1.2,1.3
From: |
Mason James |
Subject: |
[Koha-cvs] CVS: koha stats.print.pl,1.2,1.3 |
Date: |
Sun, 21 Aug 2005 19:26:38 -0700 |
Update of /cvsroot/koha/koha
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv28971
Modified Files:
stats.print.pl
Log Message:
Oops, adding CSV_XS module back.
Index: stats.print.pl
===================================================================
RCS file: /cvsroot/koha/koha/stats.print.pl,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -r1.2 -r1.3
*** stats.print.pl 22 Aug 2005 00:37:11 -0000 1.2
--- stats.print.pl 22 Aug 2005 02:26:36 -0000 1.3
***************
*** 2,6 ****
! #use strict;
use CGI;
use C4::Output;
--- 2,6 ----
! use strict;
use CGI;
use C4::Output;
***************
*** 12,20 ****
use C4::Stats;
-
-
my $input=new CGI;
!
my $date;
my $date2;
--- 12,20 ----
use C4::Stats;
my $input=new CGI;
+ my $time=$input->param('time');
! my @loop1;
! my @loop2;
my $date;
my $date2;
***************
*** 133,137 ****
for my $row ( @loop1 ) {
! $csv->combine(@$row);
my $string = $csv->string;
print $string, "\n";
--- 133,137 ----
for my $row ( @loop1 ) {
! my $csv->combine(@$row);
my $string = $csv->string;
print $string, "\n";
***************
*** 142,146 ****
for my $row ( @loop2 ) {
! $csv->combine(@$row);
my $string = $csv->string;
print $string, "\n";
--- 142,146 ----
for my $row ( @loop2 ) {
! my $csv->combine(@$row);
my $string = $csv->string;
print $string, "\n";
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] CVS: koha stats.print.pl,1.2,1.3,
Mason James <=