From f0cccceef84fcaae8b75723195f54cc10de5e46d Mon Sep 17 00:00:00 2001
From: djfiander <djfiander>
Date: Fri, 14 Apr 2006 17:14:56 +0000
Subject: [PATCH] Delete handling of "FID_FEE_ITEMS", since it doesn't exist
 (the Patron Information Response message documentation is wrong). Correct
 handling of Address, Email, and Home Phone fields in Patron Information
 Response in response to corrections from 3M

---
 Sip/MsgType.pm | 15 ++++++---------
 1 file changed, 6 insertions(+), 9 deletions(-)

diff --git a/Sip/MsgType.pm b/Sip/MsgType.pm
index 6a27804..adcd640 100644
--- a/Sip/MsgType.pm
+++ b/Sip/MsgType.pm
@@ -845,14 +845,6 @@ my @summary_map = (
 		     fid => FID_RECALL_ITEMS },
 		   { func => ILS::Patron->can("unavail_holds"), 
 		     fid => FID_UNAVAILABLE_HOLD_ITEMS },
-		   { func => ILS::Patron->can("fee_items"),
-		     fid => FID_FEE_ITEMS },
-		   { func => ILS::Patron->can("address"),
-		     fid => FID_HOME_ADDR },
-		   { func => ILS::Patron->can("email_addr"),
-		     fid => FID_EMAIL },
-		   { func => ILS::Patron->can("home_phone"),
-		     fid => FID_HOME_PHONE },
 		   );
 
 #
@@ -935,11 +927,16 @@ sub handle_patron_info {
 	$resp .= add_count('recall_items', $patron->recall_items_count);
 	$resp .= add_count('unavail_holds', $patron->unavail_holds_count);
 	
-	$resp .= add_field(FID_PERSONAL_NAME, $patron->name);
 	# while the patron ID we got from the SC is valid, let's
 	# use the one returned from the ILS, just in case...
 	$resp .= FID_PATRON_ID . $patron->id . $field_delimiter;
 
+	$resp .= add_field(FID_PERSONAL_NAME, $patron->name);
+
+	$resp .= maybe_add(FID_HOME_ADDR,$patron->address);
+	$resp .= maybe_add(FID_EMAIL, $patron->email_addr);
+	$resp .= maybe_add(FID_HOME_PHONE, $patron->home_phone);
+
 	$resp .= summary_info($patron, $summary, $start, $end);
     }
 
-- 
2.11.0