From fb2edbd4b07b79154afba2ba1e99f4be9afe670a Mon Sep 17 00:00:00 2001
From: tipaul <tipaul>
Date: Thu, 31 Aug 2006 16:24:49 +0000
Subject: [PATCH] why the hell did we remove the , in server name ? fix for
 http://bugs.koha.org/cgi-bin/bugzilla/show_bug.cgi?id=1047

---
 admin/z3950servers.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/admin/z3950servers.pl b/admin/z3950servers.pl
index 492e068a2d..b1acb46f70 100755
--- a/admin/z3950servers.pl
+++ b/admin/z3950servers.pl
@@ -54,7 +54,6 @@ my $script_name="/cgi-bin/koha/admin/z3950servers.pl";
 
 my $pagesize=20;
 my $op = $input->param('op');
-$searchfield=~ s/\,//g;
 
 my ($template, $loggedinuser, $cookie) 
     = get_template_and_user({template_name => "parameters/z3950servers.tmpl",
@@ -80,6 +79,7 @@ if ($op eq 'add_form') {
 		my $dbh = C4::Context->dbh;
 		my $sth=$dbh->prepare("select host,port,db,userid,password,name,id,checked,rank,syntax from z3950servers where (name = ?) order by rank,name");
 		$sth->execute($searchfield);
+		warn "SEARCH : $searchfield";
 		$data=$sth->fetchrow_hashref;
 		$sth->finish;
 	}