gitea
/
Koha-clms
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

removed warnings

This commit is contained in:
genji 2007-01-29 09:28:07 +00:00
parent e29d767039
commit 8372fe38fd
1 changed files with 1 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
circ/circulation.pl
View File

@ -85,9 +85,7 @@ $env{'queue'}=$printer;
my @datearr = localtime(time());
# FIXME - Could just use POSIX::strftime("%Y%m%d", localtime);
my $todaysdate = (1900+$datearr[5]).sprintf ("%0.2d", ($datearr[4]+1)).sprintf ("%0.2d", ($datearr[3]));
warn $todaysdate;
my $todaysdate = (1900+$datearr[5]).sprintf ("%0.2d", ($datearr[4]+1)).sprintf ("%0.2d", ($datearr[3]))
# check and see if we should print
if ($barcode eq '' && $print eq 'maybe'){
$print = 'yes';
@ -201,7 +199,6 @@ if ($borrower) {
my $issuedate = $issueslist->{$it}->{'timestamp'};
$issuedate = substr($issuedate, 0, 10);
$issuedate=~s/-//g;
warn $issuedate;
if ($todaysdate == $issuedate) {
push @todaysissues, $issueslist->{$it};
} else {