|
Lines 511-525
sub renew_all {
Link Here
|
| 511 |
siplog("LOG_DEBUG", "ILS::renew_all: Invalid patron id: '%s'", $patron_id); |
511 |
siplog("LOG_DEBUG", "ILS::renew_all: Invalid patron id: '%s'", $patron_id); |
| 512 |
} |
512 |
} |
| 513 |
|
513 |
|
| 514 |
if (!defined($patron)) { |
514 |
if (!$patron) { |
| 515 |
$trans->screen_msg("Invalid patron barcode."); |
515 |
$trans->screen_msg("Invalid patron barcode."); |
| 516 |
return $trans; |
516 |
return $trans; |
| 517 |
} elsif (!$patron->renew_ok) { |
517 |
} elsif (!$patron->renew_ok) { |
| 518 |
$trans->screen_msg("Renewals not allowed."); |
518 |
$trans->screen_msg("Renewals not allowed."); |
| 519 |
return $trans; |
519 |
return $trans; |
| 520 |
} elsif (defined($patron_pwd) && !$patron->check_password($patron_pwd)) { |
|
|
| 521 |
$trans->screen_msg("Invalid patron password."); |
| 522 |
return $trans; |
| 523 |
} |
520 |
} |
| 524 |
|
521 |
|
| 525 |
$trans->do_renew_all; |
522 |
$trans->do_renew_all; |
| 526 |
- |
|
|