From e3519f15382351d04827b1d64e413f4ffbae0637 Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Mon, 5 Jun 2017 12:35:10 -0300 Subject: [PATCH] Bug 8612: Remove warnings from tests Signed-off-by: Jonathan Druart --- C4/Acquisition.pm | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/C4/Acquisition.pm b/C4/Acquisition.pm index 16f442460d..ed80b26484 100644 --- 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) { -- 2.39.5