From d39c10d14b28027edca5aa83ad3af364ce80cbef Mon Sep 17 00:00:00 2001 From: Kyle M Hall Date: Tue, 18 Jun 2013 08:44:49 -0400 Subject: [PATCH] Bug 7703 - QA Followup Signed-off-by: Srdjan --- C4/Biblio.pm | 2 ++ C4/Items.pm | 2 ++ 2 files changed, 4 insertions(+) diff --git a/C4/Biblio.pm b/C4/Biblio.pm index ae1f2f3..3b18064 100644 --- a/C4/Biblio.pm +++ b/C4/Biblio.pm @@ -1072,6 +1072,8 @@ sub GetBiblio { sub GetBiblioItemInfosOf { my @biblioitemnumbers = @_; + return unless @biblioitemnumbers; + my $biblioitemnumber_values = @biblioitemnumbers ? join( ',', @biblioitemnumbers ) : "''"; my $query = " diff --git a/C4/Items.pm b/C4/Items.pm index 651e590..cdf17e4 100644 --- a/C4/Items.pm +++ b/C4/Items.pm @@ -1195,6 +1195,8 @@ sub GetItemsCount { sub GetItemInfosOf { my @itemnumbers = @_; + return unless @itemnumbers; + my $itemnumber_values = @itemnumbers ? join( ',', @itemnumbers ) : "''"; my $query = " -- 2.7.4