From fa237fb54e59285afb25b73820f768c9b06ab17d Mon Sep 17 00:00:00 2001 From: Alex Arnaud Date: Wed, 15 Jun 2016 16:11:07 +0200 Subject: [PATCH] Bug 14968 - Provides unit test Signed-off-by: Broust Signed-off-by: Jonathan Druart --- t/db_dependent/Reserves.t | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/t/db_dependent/Reserves.t b/t/db_dependent/Reserves.t index cfc6eee..1852ae6 100755 --- a/t/db_dependent/Reserves.t +++ b/t/db_dependent/Reserves.t @@ -17,7 +17,7 @@ use Modern::Perl; -use Test::More tests => 73; +use Test::More tests => 74; use Test::Warn; use MARC::Record; @@ -580,6 +580,9 @@ ok( $bz14464_reserve, 'Bug 14464 - 1st reserve correctly created' ); CancelReserve({ reserve_id => $bz14464_reserve, charge_cancel_fee => 1 }); +my $old_reserve = Koha::Database->new()->schema()->resultset('OldReserve')->find( $bz14464_reserve ); +is($old_reserve->get_column('found'), 'W', 'Bug 14968 - Keep found column from reserve'); + ( undef, undef, $bz14464_fines ) = GetMemberIssuesAndFines( $borrowernumber ); is( !$bz14464_fines || $bz14464_fines==0, 1, 'Bug 14464 - No fines after cancelling reserve with no charge configured' ); -- 2.8.1