From 0006f1161f6b0afc974a414718431fd927527528 Mon Sep 17 00:00:00 2001 From: Jason Etheridge Date: Fri, 20 Apr 2012 07:29:14 -0400 Subject: [PATCH] hs18738 checked for expired accounts with SIP --- Open-ILS/src/perlmods/lib/OpenILS/SIP/Patron.pm | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/Open-ILS/src/perlmods/lib/OpenILS/SIP/Patron.pm b/Open-ILS/src/perlmods/lib/OpenILS/SIP/Patron.pm index 58f72bd59d..abf100edd3 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/SIP/Patron.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/SIP/Patron.pm @@ -377,9 +377,8 @@ sub screen_msg { return $b if $u->standing_penalties and @{$u->standing_penalties}; # has the patron account expired? - # GMC 2012-02-12 - let expired cards work - #my $expire = DateTime::Format::ISO8601->new->parse_datetime(cleanse_ISO8601($u->expire_date)); - #return $b if CORE::time > $expire->epoch; + my $expire = DateTime::Format::ISO8601->new->parse_datetime(cleanse_ISO8601($u->expire_date)); + return $b if CORE::time > $expire->epoch; return 'OK'; } -- 2.11.0