From 25ee994e5a366f4a8a473c93c7c9cee3a28b2b39 Mon Sep 17 00:00:00 2001 From: Kyle M Hall Date: Wed, 21 Sep 2016 02:13:47 +0000 Subject: [PATCH] Bug 17327 - Add unit test for regression Signed-off-by: Benjamin Rokseth --- t/db_dependent/Reserves/MultiplePerRecord.t | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/t/db_dependent/Reserves/MultiplePerRecord.t b/t/db_dependent/Reserves/MultiplePerRecord.t index e5c2f3d..9771051 100755 --- a/t/db_dependent/Reserves/MultiplePerRecord.t +++ b/t/db_dependent/Reserves/MultiplePerRecord.t @@ -20,7 +20,7 @@ use Carp::Always; use Modern::Perl; -use Test::More tests => 37; +use Test::More tests => 38; use t::lib::TestBuilder; use C4::Reserves qw( GetMaxPatronHoldsForRecord AddReserve CanBookBeReserved ); @@ -231,6 +231,9 @@ $rule3->delete(); $rule4->delete(); $rule5->delete(); +my $holds = Koha::Holds->search( { borrowernumber => $patron->{borrowernumber} } ); +is( $holds->forced_hold_level, undef, "No holds does not force an item or record level hold" ); + # Test Koha::Holds::forced_hold_level my $hold = Koha::Hold->new({ borrowernumber => $patron->{borrowernumber}, @@ -240,7 +243,7 @@ my $hold = Koha::Hold->new({ priority => 1, })->store(); -my $holds = Koha::Holds->search( { borrowernumber => $patron->{borrowernumber} } ); +$holds = Koha::Holds->search( { borrowernumber => $patron->{borrowernumber} } ); is( $holds->forced_hold_level, 'record', "Record level hold forces record level holds" ); $hold->itemnumber( $item1->{itemnumber} ); -- 2.1.4