[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] CVS: koha/reports reservereport.pl,1.4,1.5
From: |
Mason James |
Subject: |
[Koha-cvs] CVS: koha/reports reservereport.pl,1.4,1.5 |
Date: |
Fri, 26 Aug 2005 22:59:02 -0700 |
Update of /cvsroot/koha/koha/reports
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv21163
Modified Files:
reservereport.pl
Log Message:
Removed Data:Dumper line, and general tidy-up.
Index: reservereport.pl
===================================================================
RCS file: /cvsroot/koha/koha/reports/reservereport.pl,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -r1.4 -r1.5
*** reservereport.pl 27 Aug 2005 04:04:40 -0000 1.4
--- reservereport.pl 27 Aug 2005 05:59:00 -0000 1.5
***************
*** 29,33 ****
use C4::Auth;
use C4::Interface::CGI::Output;
- use Data::Dumper;
my $input = new CGI;
--- 29,32 ----
***************
*** 47,58 ****
my ( $count, $data ) = unfilledreserves();
-
- #print Dumper($count, $data);
-
my @dataloop;
for ( my $i = 0 ; $i < $count ; $i++ ) {
my %line;
- # $line{name} = "$data->[$i]->{'surname'}\,
$data->[$i]->{'firstname'}";
$line{name} = "<p><a
href=\"/cgi-bin/koha/members/moremember.pl?bornum=$data->[$i]->{'borrowernumber'}\">$data->[$i]->{'surname'}\,
$data->[$i]->{'firstname'}</a></p>";
$line{'reservedate'} = $data->[$i]->{'reservedate'};
--- 46,53 ----
***************
*** 66,74 ****
}
- #= "<p><a
href=\"/cgi-bin/koha/request.pl?bib=$data->[$i]->{'biblionumber'}\">$data->[$i]->{'title'}</a></p>";
#manky
- #= "<p><a
href=\"/cgi-bin/koha/members/moremember.pl?bornum=$data->[$i]->{'borrowernumber'}\">$data->[$i]->{'surname'}\,
$data->[$i]->{'firstname'}</a></p>";
-
-
-
$template->param(
--- 61,64 ----
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] CVS: koha/reports reservereport.pl,1.4,1.5,
Mason James <=