#1459 yadc : Yet Another Date::Calc problem...

if dateexpiry is empty, set issuingimpossible without any calculation

Signed-off-by: Chris Cormack <crc@liblime.com>
Signed-off-by: Joshua Ferraro <jmf@liblime.com>

diff --git a/C4/Circulation.pm b/C4/Circulation.pm
index 71a9dc1..6917110 100644 (file)
--- a/C4/Circulation.pm
+++ b/C4/Circulation.pm
@@ -681,15 +681,15 @@ sub CanBookBeIssued {
     if ( $borrower->{flags}->{'DBARRED'} ) {
         $issuingimpossible{DEBARRED} = 1;
     }
-    if ( Date_to_Days(Today) > 
-        Date_to_Days( split "-", $borrower->{'dateexpiry'} ) )
-    {
-
-        #
-        #if (&Date_Cmp(&ParseDate($borrower->{expiry}),&ParseDate("today"))<0) {
+    if ( $borrower->{'dateexpiry'} eq '0000-00-00') {
         $issuingimpossible{EXPIRED} = 1;
+    } else {
+        if ( Date_to_Days(Today) > 
+            Date_to_Days( split "-", $borrower->{'dateexpiry'} ) )
+        {
+            $issuingimpossible{EXPIRED} = 1;
+        }
     }
-
     #
     # BORROWER STATUS
     #