Lines 531-536
if ((!$nok) and $nodouble and ($op eq 'insert' or $op eq 'save')){
Link Here
|
531 |
$newdata{debarredcomment} = $newdata{debarred_comment}; |
531 |
$newdata{debarredcomment} = $newdata{debarred_comment}; |
532 |
delete $newdata{debarred_comment}; |
532 |
delete $newdata{debarred_comment}; |
533 |
delete $newdata{password2}; |
533 |
delete $newdata{password2}; |
|
|
534 |
|
535 |
if (( $newdata{categorycode} ne 'J' ) || ( $newdata{categorycode} ne 'K' ) || ( $newdata{categorycode} ne 'YA' )) { |
536 |
$newdata{guarantorid} = ''; |
537 |
} |
538 |
|
534 |
$patron->set(\%newdata)->store if scalar(keys %newdata) > 1; # bug 4508 - avoid crash if we're not |
539 |
$patron->set(\%newdata)->store if scalar(keys %newdata) > 1; # bug 4508 - avoid crash if we're not |
535 |
# updating any columns in the borrowers table, |
540 |
# updating any columns in the borrowers table, |
536 |
# which can happen if we're only editing the |
541 |
# which can happen if we're only editing the |
537 |
- |
|
|