setting the pw to null so it is not broken
authorerickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Tue, 21 Feb 2006 16:05:30 +0000 (16:05 +0000)
committererickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Tue, 21 Feb 2006 16:05:30 +0000 (16:05 +0000)
git-svn-id: svn://svn.open-ils.org/ILS/trunk@3145 dcc99617-32d9-48b4-a31d-7c20da2025e4

Open-ILS/src/perlmods/OpenILS/Application/Actor.pm

index 4c1616b..8125f4a 100644 (file)
@@ -340,6 +340,8 @@ sub _update_patron {
        my $evt = $U->check_perms($user_obj->id, $patron->home_ou, 'UPDATE_USER');
        return (undef, $evt) if $evt;
 
+       $patron->clear_passwd if ($patron->passwd =~ /^\s+/);
+
        my $stat = $session->request(
                "open-ils.storage.direct.actor.user.update",$patron )->gather(1);
        return (undef, $U->DB_UPDATE_FAILED($patron)) unless defined($stat);