From 2d5f0c732751dfe467534d0200a71c36b9f952e3 Mon Sep 17 00:00:00 2001
From: Julian Maurice <julian.maurice@biblibre.com>
Date: Tue, 13 Sep 2016 15:32:35 +0200
Subject: [PATCH] Bug 11844: Fix syntax errors

---
 acqui/neworderempty.pl | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/acqui/neworderempty.pl b/acqui/neworderempty.pl
index 001635e..6d0bc4f 100755
--- a/acqui/neworderempty.pl
+++ b/acqui/neworderempty.pl
@@ -73,7 +73,6 @@ use CGI qw ( -utf8 );
 use C4::Acquisition;
 use C4::Auth;
 use C4::Biblio;    # GetBiblioData GetMarcPrice
-use C4::Branch;    # GetBranches
 use C4::Budgets;
 use C4::Context;
 use C4::Contract;
@@ -292,7 +291,7 @@ if ( $ordernumber ) {
         record_id => $ordernumber,
     } )->{$ordernumber};
 } elsif ( $biblionumber ) {
-    foreach my $af (@$additional_fields) {
+    foreach my $af (@$available_additional_fields) {
         if ($af->{marcfield}) {
             $record //= GetMarcBiblio($biblionumber);
             my ($field, $subfield) = split /\$/, $af->{marcfield};
-- 
2.1.4