Lines 1639-1646
subtest 'Recalls tests' => sub {
Link Here
|
1639 |
# Patron2 has Item1 checked out. Patron1 has placed a biblio-level recall on Biblio1, so check if Item1 can fulfill Patron1's recall. |
1639 |
# Patron2 has Item1 checked out. Patron1 has placed a biblio-level recall on Biblio1, so check if Item1 can fulfill Patron1's recall. |
1640 |
|
1640 |
|
1641 |
Koha::CirculationRules->set_rules({ |
1641 |
Koha::CirculationRules->set_rules({ |
1642 |
branchcode => undef, |
1642 |
branchcode => $branchcode, |
1643 |
categorycode => undef, |
1643 |
categorycode => $patron1->categorycode, |
1644 |
itemtype => $item1->effective_itemtype, |
1644 |
itemtype => $item1->effective_itemtype, |
1645 |
rules => { |
1645 |
rules => { |
1646 |
recalls_allowed => 0, |
1646 |
recalls_allowed => 0, |
Lines 1651-1658
subtest 'Recalls tests' => sub {
Link Here
|
1651 |
is( $item1->can_be_waiting_recall, 0, "Recalls not allowed for this itemtype" ); |
1651 |
is( $item1->can_be_waiting_recall, 0, "Recalls not allowed for this itemtype" ); |
1652 |
|
1652 |
|
1653 |
Koha::CirculationRules->set_rules({ |
1653 |
Koha::CirculationRules->set_rules({ |
1654 |
branchcode => undef, |
1654 |
branchcode => $branchcode, |
1655 |
categorycode => undef, |
1655 |
categorycode => $patron1->categorycode, |
1656 |
itemtype => $item1->effective_itemtype, |
1656 |
itemtype => $item1->effective_itemtype, |
1657 |
rules => { |
1657 |
rules => { |
1658 |
recalls_allowed => 1, |
1658 |
recalls_allowed => 1, |
1659 |
- |
|
|