From: Jason Etheridge <jason@esilibrary.com>
Date: Thu, 18 Apr 2013 19:31:59 +0000 (-0400)
Subject: push CSS hook for PATRON_EXPIRED in alt patron summary
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=cc8c1302842c43f58f4f7d8f41e410289d262548;p=working%2FEvergreen.git

push CSS hook for PATRON_EXPIRED in alt patron summary
---

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/PatronSummary.pm b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/PatronSummary.pm
index a751333193..4e32be681b 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/PatronSummary.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/PatronSummary.pm
@@ -138,7 +138,13 @@ sub load_patron_summary {
         push @classnames, 'PATRON_HAS_INVALID_ADDRESS';
     }
 
-    # TODO: PATRON_EXPIRED
+    my $expire = DateTime::Format::ISO8601->new->parse_datetime(
+        cleanse_ISO8601($au_resp->expire_date));
+
+    if( CORE::time > $expire->epoch ) {
+        push @classnames, 'PATRON_EXPIRED';
+    }
+
     # TODO: PATRON_AGE_IS_
     # TODO: PATRON_AGE_LT_
     # TODO: PATRON_AGE_GE_