@@ -, +, @@ --- C4/Auth_with_ldap.pm | 3 +++ 1 file changed, 3 insertions(+) --- a/C4/Auth_with_ldap.pm +++ a/C4/Auth_with_ldap.pm @@ -304,6 +304,9 @@ sub _do_changepassword { "Unable to access borrowernumber with userid=$userid, borrowernumber=$borrowerid" if !$sth->rows; my ($cardnum) = $sth->fetchrow; + my $sth = C4::Context->dbh->prepare( + 'UPDATE borrowers SET password = null WHERE borrowernumber=?'); + $sth->execute($borrowerid); return $cardnum; } my $digest = hash_password($password); --