From a01e440dcb8b418cfe015aa0ab65180882db6550 Mon Sep 17 00:00:00 2001
From: djfiander <djfiander>
Date: Sun, 30 Apr 2006 00:13:48 +0000
Subject: [PATCH] Add stub methods sip_birthdate and ptype, to support
 Envisionware terminals (and probably others).

---
 ILS/Patron.pm | 14 ++++++++++++++
 1 file changed, 14 insertions(+)

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;
 
-- 
2.11.0