View | Details | Raw Unified | Return to bug 9165
Collapse All | Expand All

(-)a/C4/Auth_with_ldap.pm (-4 / +4 lines)
Lines 300-310 sub _do_changepassword { Link Here
300
        my $sth = C4::Context->dbh->prepare(
300
        my $sth = C4::Context->dbh->prepare(
301
            'SELECT cardnumber FROM borrowers WHERE borrowernumber=?');
301
            'SELECT cardnumber FROM borrowers WHERE borrowernumber=?');
302
        $sth->execute($borrowerid);
302
        $sth->execute($borrowerid);
303
        die
303
        die "Unable to access borrowernumber "
304
"Unable to access borrowernumber with userid=$userid, borrowernumber=$borrowerid"
304
            . "with userid=$userid, "
305
            . "borrowernumber=$borrowerid"
305
          if !$sth->rows;
306
          if !$sth->rows;
306
        my ($cardnum) = $sth->fetchrow;
307
        my ($cardnum) = $sth->fetchrow;
307
        my $sth = C4::Context->dbh->prepare(
308
        $sth = C4::Context->dbh->prepare(
308
            'UPDATE borrowers SET password = null WHERE borrowernumber=?');
309
            'UPDATE borrowers SET password = null WHERE borrowernumber=?');
309
        $sth->execute($borrowerid);
310
        $sth->execute($borrowerid);
310
        return $cardnum;
311
        return $cardnum;
311
- 

Return to bug 9165