Revert "Bug 9046: Followup FIX perl v.10 raises an error if itemnumbers if undefined"
authorKyle M Hall <kyle@bywatersolutions.com>
Fri, 20 Dec 2013 14:15:16 +0000 (09:15 -0500)
committerKyle M Hall <kyle@bywatersolutions.com>
Fri, 20 Dec 2013 14:15:16 +0000 (09:15 -0500)
This reverts commit af1b555438f29c301e09cf0776da1811ec0ba394.

C4/Biblio.pm

index b0d277a..7c3d0ef 100644 (file)
@@ -2841,8 +2841,6 @@ sub EmbedItemsInMarcBiblio {
     my ($marc, $biblionumber) = @_;
     croak "No MARC record" unless $marc;
 
-    $itemnumbers = [] unless defined $itemnumbers;
-
     my $frameworkcode = GetFrameworkCode($biblionumber);
     _strip_item_fields($marc, $frameworkcode);