From 554360936e2d8a05c4411ad14d7fa8bdb7eb2bc4 Mon Sep 17 00:00:00 2001
From: tonnesen <tonnesen>
Date: Mon, 24 Jun 2002 22:08:20 +0000
Subject: [PATCH] Modification to date sprintf line fixes problem with current
 issues showing up as previous issues.

---
 C4/Circulation/Circ2.pm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/C4/Circulation/Circ2.pm b/C4/Circulation/Circ2.pm
index 78c5bcc13b..85b1d61d4c 100755
--- a/C4/Circulation/Circ2.pm
+++ b/C4/Circulation/Circ2.pm
@@ -682,11 +682,13 @@ sub currentissues {
     if ($env->{'todaysissues'}) {
 	my @datearr = localtime(time());
 	my $today = (1900+$datearr[5]).sprintf "%02d", ($datearr[4]+1).sprintf "%02d", $datearr[3];
+	$today=sprintf "%4d%02d%02d", (1900+$datearr[5]), ($datearr[4]+1), $datearr[3];
 	$crit=" and issues.timestamp like '$today%' ";
     }
     if ($env->{'nottodaysissues'}) {
 	my @datearr = localtime(time());
 	my $today = (1900+$datearr[5]).sprintf "%02d", ($datearr[4]+1).sprintf "%02d", $datearr[3];
+	$today=sprintf "%4d%02d%02d", (1900+$datearr[5]), ($datearr[4]+1), $datearr[3];
 	$crit=" and !(issues.timestamp like '$today%') ";
     }
     my $select="select * from issues,items,biblioitems,biblio where
-- 
2.39.5