From 839b7d6d498ab43b0ee94a194f78a7c5c8f6e26e Mon Sep 17 00:00:00 2001 From: Josef Moravec Date: Mon, 25 Mar 2019 11:21:45 +0000 Subject: [PATCH] Bug 22565: (QA follow-up) Fix test Acquisition.t Test plan: prove t/db_dependent/Acquisition.t should pass Signed-off-by: Josef Moravec --- t/db_dependent/Acquisition.t | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/t/db_dependent/Acquisition.t b/t/db_dependent/Acquisition.t index 3a07c8b3c8..b997f70345 100755 --- a/t/db_dependent/Acquisition.t +++ b/t/db_dependent/Acquisition.t @@ -19,7 +19,7 @@ use Modern::Perl; use POSIX qw(strftime); -use Test::More tests => 74; +use Test::More tests => 75; use t::lib::Mocks; use Koha::Database; use Koha::Acquisition::Basket; @@ -511,7 +511,7 @@ $nonexistent_order = GetOrder( 424242424242 ); is( $nonexistent_order, undef, 'GetOrder returns undef if a nonexistent ordernumber is given' ); # Tests for DelOrder -my $order1 = GetOrder($ordernumbers[0]); +$order1 = GetOrder($ordernumbers[0]); my $error = DelOrder($order1->{biblionumber}, $order1->{ordernumber}); ok((not defined $error), "DelOrder does not fail"); $order1 = GetOrder($order1->{ordernumber}); -- 2.11.0