From: Jesse Weaver <jesse.weaver@liblime.com>
Date: Thu, 10 Jul 2008 18:21:28 +0000 (-0500)
Subject: fix for 2181: Late Items in Red
X-Git-Tag: ffzg~159
X-Git-Url: http://git.rot13.org/?a=commitdiff_plain;h=36b2897430b27a6b8a12f6684d32bc64e026073f;p=koha.git

fix for 2181: Late Items in Red

Modified overdue check in circ/circulation.pl to use Date::Manip's Date_Cmp. This would likely be useful other places in the file.

Signed-off-by: Galen Charlton <galen.charlton@liblime.com>
Signed-off-by: Joshua Ferraro <jmf@liblime.com>
---

diff --git a/circ/circulation.pl b/circ/circulation.pl
index 61babaad47..b165d68369 100755
--- a/circ/circulation.pl
+++ b/circ/circulation.pl
@@ -44,6 +44,10 @@ use Date::Calc qw(
   Date_to_Days
 );
 
+use Date::Manip qw(
+  Date_Cmp
+);
+
 
 #
 # PARAMETERS READING
@@ -450,9 +454,7 @@ if ($borrower) {
     ($restype) and $it->{'can_renew'} = 0;
 
     $it->{'dd'} = format_date($it->{'date_due'});
-        my $datedue = $it->{'date_due'};
-        $datedue =~ s/-//g;
-    $it->{'od'} = ($datedue < $todaysdate) ? 1 : 0 ;
+    $it->{'od'} = Date_Cmp($todaysdate, $it->{'date_due'}) == 1 ? 1 : 0 ;
         ($it->{'author'} eq '') and $it->{'author'} = ' ';
         $it->{'renew_failed'} = $renew_failed[$it->{'itemnumber'}];
         # ADDED BY JF: NEW ITEMTYPE COUNT DISPLAY