Bug 24860: (QA follow-up) Add unit tests to cover Koha::Holds::forced_hold_level
Signed-off-by: Katrin Fischer <katrin.fischer.83@web.de> Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
This commit is contained in:
parent
1e19b90e1f
commit
b77084a3f7
1 changed files with 9 additions and 1 deletions
|
@ -19,7 +19,7 @@
|
|||
|
||||
use Modern::Perl;
|
||||
|
||||
use Test::More tests => 15;
|
||||
use Test::More tests => 16;
|
||||
use t::lib::TestBuilder;
|
||||
use t::lib::Mocks;
|
||||
|
||||
|
@ -205,6 +205,14 @@ $hold->store();
|
|||
$holds = Koha::Holds->search( { borrowernumber => $patron->{borrowernumber} } );
|
||||
is( $holds->forced_hold_level, 'item', "Item level hold forces item level holds" );
|
||||
|
||||
my $item_group = Koha::Biblio::ItemGroup->new( { biblio_id => $biblio->id } )->store();
|
||||
$hold->itemnumber( undef );
|
||||
$hold->item_group_id( $item_group->id );
|
||||
$hold->store();
|
||||
|
||||
$holds = Koha::Holds->search( { borrowernumber => $patron->{borrowernumber} } );
|
||||
is( $holds->forced_hold_level, 'item_group', "Item group level hold forces item group level holds" );
|
||||
|
||||
$hold->delete();
|
||||
|
||||
# Test multi-hold via AddReserve
|
||||
|
|
Loading…
Reference in a new issue