From: Jonathan Druart <jonathan.druart@biblibre.com>
Date: Mon, 13 May 2013 12:00:44 +0000 (+0200)
Subject: Bug 7593: Fix unit tests
X-Git-Url: http://git.rot13.org/?a=commitdiff_plain;h=94e00ac835568d82222bd2214df0bf19cbe0f82b;p=koha.git

Bug 7593: Fix unit tests

Signed-off-by: Jared Camins-Esakov <jcamins@cpbibliography.com>
---

diff --git a/t/db_dependent/Acquisition.t b/t/db_dependent/Acquisition.t
index db43118603..b339db3d2e 100755
--- a/t/db_dependent/Acquisition.t
+++ b/t/db_dependent/Acquisition.t
@@ -10,7 +10,7 @@ use POSIX qw(strftime);
 
 use C4::Bookseller qw( GetBookSellerFromId );
 
-use Test::More tests => 42;
+use Test::More tests => 41;
 
 BEGIN {
     use_ok('C4::Acquisition');
@@ -43,7 +43,7 @@ SKIP: {
    my $testorder = @$orders[0];
    my $testbiblio = $testorder->{'biblionumber'};
    my @listorders = GetOrdersByBiblionumber($testbiblio);
-   isa_ok( ref @listorders, 'ARRAY','GetOrdersByBiblionumber : result is an array' );
+   ok( @listorders ,'GetOrdersByBiblionumber : result is defined' );
    ok( scalar (@listorders) >0,'GetOrdersByBiblionumber : result contains at least one element' );
    my @matched_biblios = grep {$_->{biblionumber} == $testbiblio} @listorders;
    ok ( @matched_biblios == @listorders, "all orders match");