JBAS-1638 Patron self-reg cleans spaces

Remove leading / trailing spaces from user-entered values in patron
self-registration app.  In addition to resulting in cleaner data, it
allows the patron editor's duplicate patron search code to work w/ like
values.

Signed-off-by: Bill Erickson <berickxx@gmail.com>

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Register.pm b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Register.pm
index ff6c983..6bdd3d0 100644 (file)
--- a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Register.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Register.pm
@@ -477,6 +477,9 @@ sub inspect_register_value {
     my %keep_case = (usrname => 1, passwd => 1, email => 1);
     $value = uc($value) unless $keep_case{$field};
 
+    # JBAS-1638 remove opening/trailing spaces
+    $value =~ s/(^\s*|\s*$)//g;
+
     my $regex = $self->{register}{settings}{$scls}{$field}{regex};
     return $value if !$regex or $value =~ /$regex/; # field is valid