[open-ils-commits] r19998 - trunk/Open-ILS/src/perlmods/lib/OpenILS/SIP (miker)

[svn at svn.open-ils.org]

Author: miker
Date: 2011-04-06 14:36:38 -0400 (Wed, 06 Apr 2011)
New Revision: 19998

Modified:
   trunk/Open-ILS/src/perlmods/lib/OpenILS/SIP/Patron.pm
Log:
Patch from Thomas Berezansky to support patron priv expiration information in SIP2

Modified: trunk/Open-ILS/src/perlmods/lib/OpenILS/SIP/Patron.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/lib/OpenILS/SIP/Patron.pm	2011-04-06 18:23:23 UTC (rev 19997)
+++ trunk/Open-ILS/src/perlmods/lib/OpenILS/SIP/Patron.pm	2011-04-06 18:36:38 UTC (rev 19998)
@@ -240,6 +240,13 @@
 	return $dob;
 }
 
+sub sip_expire {
+    my $self = shift;
+    my $expire = OpenILS::SIP->format_date($self->{user}->expire_date);
+    syslog('LOG_DEBUG', "OILS: Patron Expire = $expire");
+    return $expire;
+}
+
 sub ptype {
     my $self = shift;