Bug 8612: Remove warnings from tests

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>

diff --git a/C4/Acquisition.pm b/C4/Acquisition.pm
index 16f4424..ed80b26 100644 (file)
--- a/C4/Acquisition.pm
+++ b/C4/Acquisition.pm
@@ -315,8 +315,11 @@ sub GetBasketAsCSV {
             my $bd = GetBiblioData( $order->{'biblionumber'} );
             my @biblioitems = GetBiblioItemByBiblioNumber( $order->{'biblionumber'});
             for my $biblioitem (@biblioitems) {
-                if ($biblioitem->{isbn} eq $order->{isbn}) {
-                    $order = {%$order, %$biblioitem};
+                if (    $biblioitem->{isbn}
+                    and $order->{isbn}
+                    and $biblioitem->{isbn} eq $order->{isbn} )
+                {
+                    $order = { %$order, %$biblioitem };
                 }
             }
             if ($contract) {