|
Lines 536-542
if ((!$nok) and $nodouble and ($op eq 'insert' or $op eq 'save')){
Link Here
|
| 536 |
# patron attributes or messaging preferences sections |
536 |
# patron attributes or messaging preferences sections |
| 537 |
|
537 |
|
| 538 |
# should never raise an exception as password validity is checked above |
538 |
# should never raise an exception as password validity is checked above |
| 539 |
$patron->set_password({ password => $newdata{password} }); |
539 |
my $password = $newdata{password}; |
|
|
540 |
if ( $password and $password ne '****' ) { |
| 541 |
$patron->set_password({ password => $password }); |
| 542 |
} |
| 540 |
|
543 |
|
| 541 |
if (C4::Context->preference('ExtendedPatronAttributes') and $input->param('setting_extended_patron_attributes')) { |
544 |
if (C4::Context->preference('ExtendedPatronAttributes') and $input->param('setting_extended_patron_attributes')) { |
| 542 |
C4::Members::Attributes::SetBorrowerAttributes($borrowernumber, $extended_patron_attributes); |
545 |
C4::Members::Attributes::SetBorrowerAttributes($borrowernumber, $extended_patron_attributes); |
| 543 |
- |
|
|