ff : better default sip name extraction (confirmed w/ koha)

Signed-off-by: Bill Erickson <berick@esilibrary.com>

diff --git a/Open-ILS/src/perlmods/lib/FulfILLment/LAIConnector.pm b/Open-ILS/src/perlmods/lib/FulfILLment/LAIConnector.pm
index 07fc947..4d6ec52 100644 (file)
--- a/Open-ILS/src/perlmods/lib/FulfILLment/LAIConnector.pm
+++ b/Open-ILS/src/perlmods/lib/FulfILLment/LAIConnector.pm
@@ -296,6 +296,12 @@ sub get_user {
     $user->{lang_pref} = $user->{language};
     $user->{phone} = $user->{home_phone_number};
 
+    # by default, assume name is delivered space-separated
+    my @names = split(' ', $user->{personal_name} || $user->{full_name});
+    $user->{full_name} = $user->{personal_name};
+    $user->{surname} = pop(@names);
+    $user->{given_name} = join(' ', @names);
+
     $user->{billing_address} = $user->{home_address};
     $user->{mailing_address} = $user->{home_address};