From 628e58d489e6efb6e05ce5c67133a53f7f642020 Mon Sep 17 00:00:00 2001
From: tonnesen <tonnesen>
Date: Sun, 23 Jun 2002 21:18:56 +0000
Subject: [PATCH] Fixes bug in adding branch... branchcode parameter is called
 'searchfield'

---
 admin/branches.pl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/admin/branches.pl b/admin/branches.pl
index a90e8830b1..4decae187d 100755
--- a/admin/branches.pl
+++ b/admin/branches.pl
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 
-#script to administer the aqbudget table
+#script to administer the branches table
 #written 20/02/2002 by paul.poulain@free.fr
 # This software is placed under the gnu General Public License, v2 (http://www.gnu.org/licenses/gpl.html)
 
@@ -163,7 +163,7 @@ printend
 } elsif ($op eq 'add_validate') {
 	my $dbh=C4Connect;
 	my $query = "replace branches (branchcode,branchname,branchaddress1,branchaddress2,branchaddress3,branchphone,branchfax,branchemail,issuing) values (";
-	$query.= $dbh->quote($input->param('branchcode')).",";
+	$query.= $dbh->quote($input->param('searchfield')).",";
 	$query.= $dbh->quote($input->param('branchname')).",";
 	$query.= $dbh->quote($input->param('branchaddress1')).",";
 	$query.= $dbh->quote($input->param('branchaddress2')).",";
-- 
2.39.5