|
Lines 628-636
subtest "CanBookBeRenewed tests" => sub {
Link Here
|
| 628 |
is( $error, 'auto_too_soon', |
628 |
is( $error, 'auto_too_soon', |
| 629 |
'Bug 14101: Cannot renew, renewal is automatic and premature, "No renewal before" = undef (returned code is auto_too_soon)' ); |
629 |
'Bug 14101: Cannot renew, renewal is automatic and premature, "No renewal before" = undef (returned code is auto_too_soon)' ); |
| 630 |
AddReserve( |
630 |
AddReserve( |
| 631 |
$branch, $reserving_borrowernumber, $biblio->biblionumber, |
631 |
{ |
| 632 |
$bibitems, $priority, $resdate, $expdate, $notes, |
632 |
branchcode => $branch, |
| 633 |
'a title', $item_4->itemnumber, $found |
633 |
borrowernumber => $reserving_borrowernumber, |
|
|
634 |
biblionumber => $biblio->biblionumber, |
| 635 |
itemnumber => $bibitems, |
| 636 |
priority => $priority, |
| 637 |
reservation_date => $resdate, |
| 638 |
expiration_date => $expdate, |
| 639 |
notes => $notes, |
| 640 |
title => 'a title', |
| 641 |
itemnumber => $item_4->itemnumber, |
| 642 |
found => $found |
| 643 |
} |
| 634 |
); |
644 |
); |
| 635 |
( $renewokay, $error ) = CanBookBeRenewed( $renewing_borrowernumber, $item_4->itemnumber ); |
645 |
( $renewokay, $error ) = CanBookBeRenewed( $renewing_borrowernumber, $item_4->itemnumber ); |
| 636 |
is( $renewokay, 0, 'Still should not be able to renew' ); |
646 |
is( $renewokay, 0, 'Still should not be able to renew' ); |
| 637 |
- |
|
|