|
Lines 72-78
if ( $newpassword && !scalar(@errors) ) {
Link Here
|
| 72 |
token => scalar $input->param('csrf_token'), |
72 |
token => scalar $input->param('csrf_token'), |
| 73 |
}); |
73 |
}); |
| 74 |
|
74 |
|
| 75 |
my $digest = Koha::AuthUtils::hash_password( $input->param('newpassword') ); |
75 |
my $digest = Koha::AuthUtils::hash_password( scalar $input->param('newpassword') ); |
| 76 |
my $uid = $input->param('newuserid') || $bor->{userid}; |
76 |
my $uid = $input->param('newuserid') || $bor->{userid}; |
| 77 |
my $dbh = C4::Context->dbh; |
77 |
my $dbh = C4::Context->dbh; |
| 78 |
if ( Koha::Patrons->find( $member )->update_password($uid, $digest) ) { |
78 |
if ( Koha::Patrons->find( $member )->update_password($uid, $digest) ) { |
| 79 |
- |
|
|