Bug 14968 - Provides unit test
Signed-off-by: Broust <jean-manuel.broust@univ-lyon2.fr>
Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
(cherry picked from commit 1509322c9a)
Signed-off-by: Frédéric Demians <f.demians@tamil.fr>
This commit is contained in:
parent
3bed66a3e2
commit
ca08a21e4e
|
|
@ -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' );
|
||||
|
||||
|
|
|
|||
Loading…
Reference in New Issue