|
Lines 734-739
subtest "CanBookBeRenewed tests" => sub {
Link Here
|
| 734 |
is( $renewokay, 1, '(Bug 8236), Can renew, this item is overdue but not pref does not block'); |
734 |
is( $renewokay, 1, '(Bug 8236), Can renew, this item is overdue but not pref does not block'); |
| 735 |
|
735 |
|
| 736 |
t::lib::Mocks::mock_preference('OverduesBlockRenewing','block'); |
736 |
t::lib::Mocks::mock_preference('OverduesBlockRenewing','block'); |
|
|
737 |
# Clear cache after changing preference affecting has_overdues evaluation |
| 738 |
$renewing_borrower_obj->_method_cache_clear('has_overdues'); |
| 739 |
|
| 737 |
( $renewokay, $error ) = CanBookBeRenewed($renewing_borrower_obj, $issue_6); |
740 |
( $renewokay, $error ) = CanBookBeRenewed($renewing_borrower_obj, $issue_6); |
| 738 |
is( $renewokay, 0, '(Bug 8236), Cannot renew, this item is not overdue but patron has overdues'); |
741 |
is( $renewokay, 0, '(Bug 8236), Cannot renew, this item is not overdue but patron has overdues'); |
| 739 |
is( $error, 'overdue', "Correct error returned"); |
742 |
is( $error, 'overdue', "Correct error returned"); |
|
Lines 742-747
subtest "CanBookBeRenewed tests" => sub {
Link Here
|
| 742 |
is( $error, 'overdue', "Correct error returned"); |
745 |
is( $error, 'overdue', "Correct error returned"); |
| 743 |
|
746 |
|
| 744 |
t::lib::Mocks::mock_preference('OverduesBlockRenewing','blockitem'); |
747 |
t::lib::Mocks::mock_preference('OverduesBlockRenewing','blockitem'); |
|
|
748 |
# Clear cache after changing preference affecting has_overdues evaluation |
| 749 |
$renewing_borrower_obj->_method_cache_clear('has_overdues'); |
| 750 |
|
| 745 |
( $renewokay, $error ) = CanBookBeRenewed($renewing_borrower_obj, $issue_6); |
751 |
( $renewokay, $error ) = CanBookBeRenewed($renewing_borrower_obj, $issue_6); |
| 746 |
is( $renewokay, 1, '(Bug 8236), Can renew, this item is not overdue'); |
752 |
is( $renewokay, 1, '(Bug 8236), Can renew, this item is not overdue'); |
| 747 |
( $renewokay, $error ) = CanBookBeRenewed($renewing_borrower_obj, $issue_7); |
753 |
( $renewokay, $error ) = CanBookBeRenewed($renewing_borrower_obj, $issue_7); |
| 748 |
- |
|
|