From 6bf9bcc52050dbcb34a5440434085d90b1fb1f22 Mon Sep 17 00:00:00 2001 From: Kyle Hall Date: Mon, 20 Dec 2021 12:45:10 -0500 Subject: [PATCH] Bug 20817: Fix incorrect namespace for subroutine call Signed-off-by: Andrew Fuerste-Henry --- acqui/neworderempty.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/acqui/neworderempty.pl b/acqui/neworderempty.pl index 58e888396e..14a47d2d23 100755 --- a/acqui/neworderempty.pl +++ b/acqui/neworderempty.pl @@ -649,7 +649,7 @@ sub staged_items_field { # Items my @itemlist = (); my $all_items_quantity = 0; - my $alliteminfos = C4::Acquisition::Utils::GetMarcItemFieldsToOrderValues( $marcrecord, [ 'homebranch', 'holdingbranch', 'itype', 'nonpublic_note', 'public_note', 'loc', 'ccode', 'notforloan', 'uri', 'copyno', 'price', 'replacementprice', 'itemcallnumber', 'quantity', 'budget_code' ] ); + my $alliteminfos = Koha::Acquisition::Utils::GetMarcItemFieldsToOrderValues( $marcrecord, [ 'homebranch', 'holdingbranch', 'itype', 'nonpublic_note', 'public_note', 'loc', 'ccode', 'notforloan', 'uri', 'copyno', 'price', 'replacementprice', 'itemcallnumber', 'quantity', 'budget_code' ] ); if ($alliteminfos != -1) { foreach my $iteminfos (@$alliteminfos) { my %itemrecord=( -- 2.20.1