Typo in printf format string was causing all issues to appear in the
authortonnesen <tonnesen>
Wed, 10 Oct 2001 19:28:05 +0000 (19:28 +0000)
committertonnesen <tonnesen>
Wed, 10 Oct 2001 19:28:05 +0000 (19:28 +0000)
Previous issues box and not in today's issues.

C4/Circulation/Circ2.pm

index d724fc8..c221fd0 100755 (executable)
@@ -662,12 +662,12 @@ sub currentissues {
     my $crit='';
     if ($env->{'todaysissues'}) {
        my @datearr = localtime(time());
-       my $today = (1900+$datearr[5]).sprintf "0%02d", ($datearr[4]+1).sprintf "%02d", $datearr[3];
+       my $today = (1900+$datearr[5]).sprintf "%02d", ($datearr[4]+1).sprintf "%02d", $datearr[3];
        $crit=" and issues.timestamp like '$today%' ";
     }
     if ($env->{'nottodaysissues'}) {
        my @datearr = localtime(time());
-       my $today = (1900+$datearr[5]).sprintf "0%02d", ($datearr[4]+1).sprintf "%02d", $datearr[3];
+       my $today = (1900+$datearr[5]).sprintf "%02d", ($datearr[4]+1).sprintf "%02d", $datearr[3];
        $crit=" and !(issues.timestamp like '$today%') ";
     }
     my $select="select * from issues,items,biblioitems,biblio where