[Koha-cvs] CVS: koha/circ returns.pl,1.13.2.7,1.13.2.8
Finlay Thompson
finlayt at users.sourceforge.net
Thu Oct 31 23:10:06 CET 2002
Update of /cvsroot/koha/koha/circ
In directory usw-pr-cvs1:/tmp/cvs-serv588
Modified Files:
Tag: rel-1-2
returns.pl
Log Message:
Changed the date on the reserves print slip to show the mday not mday+1
Index: returns.pl
===================================================================
RCS file: /cvsroot/koha/koha/circ/returns.pl,v
retrieving revision 1.13.2.7
retrieving revision 1.13.2.8
diff -C2 -r1.13.2.7 -r1.13.2.8
*** returns.pl 29 Oct 2002 19:46:05 -0000 1.13.2.7
--- returns.pl 31 Oct 2002 22:10:02 -0000 1.13.2.8
***************
*** 220,224 ****
if ($res->{'ResFound'} eq "Reserved") {
my @da = localtime(time());
! my $todaysdate = sprintf ("%0.2d", ($da[3]+1))."/".sprintf ("%0.2d", ($da[4]+1))."/".($da[5]+1900);
my $slip = <<"EOF";
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
--- 220,224 ----
if ($res->{'ResFound'} eq "Reserved") {
my @da = localtime(time());
! my $todaysdate = sprintf ("%0.2d", ($da[3]))."/".sprintf ("%0.2d", ($da[4]+1))."/".($da[5]+1900);
my $slip = <<"EOF";
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
More information about the Koha-cvs
mailing list