From: djfiander <djfiander>
Date: Sun, 30 Apr 2006 00:13:48 +0000 (+0000)
Subject: Add stub methods sip_birthdate and ptype, to support Envisionware
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=a01e440dcb8b418cfe015aa0ab65180882db6550;p=SIPServer.git

Add stub methods sip_birthdate and ptype, to support Envisionware
terminals (and probably others).
---

diff --git a/ILS/Patron.pm b/ILS/Patron.pm
index 6affa67..35166dd 100644
--- a/ILS/Patron.pm
+++ b/ILS/Patron.pm
@@ -25,6 +25,8 @@ our %patron_db = (
 		      name => "David J. Fiander",
 		      id => 'djfiander',
 		      password => '6789',
+		      ptype => 'A', # 'A'dult.  Whatever.
+		      sip_birthdate => '1964-09-25',
 		      address => '2 Meadowvale Dr. St Thomas, ON',
 		      home_phone => '(519) 555 1234',
 		      email_addr => 'djfiander@hotmail.com',
@@ -100,6 +102,18 @@ sub home_phone {
     return $self->{home_phone};
 }
 
+sub sip_birthdate {
+    my $self = shift;
+
+    return $self->{birthdate};
+}
+
+sub ptype {
+    my $self = shift;
+
+    return $self->{ptype};
+}
+
 sub language {
     my $self = shift;