From f3e5fcd15d6177330f56ec61c931d9f50c2d3cad Mon Sep 17 00:00:00 2001 From: shedges Date: Sun, 5 Sep 2004 22:33:12 +0000 Subject: [PATCH] Fix bug 789 (in HEAD) --- C4/Search.pm | 9 +++++---- members/member.pl | 1 + 2 files changed, 6 insertions(+), 4 deletions(-) diff --git a/C4/Search.pm b/C4/Search.pm index 85368ce188..67b0ec50b2 100755 --- a/C4/Search.pm +++ b/C4/Search.pm @@ -1887,10 +1887,11 @@ sub BornameSearch { "; @bind=("$data[0]%","% $data[0]%","$data[0]%","% $data[0]%","$data[0]%","% $data[0]%"); for (my $i=1;$i<$count;$i++){ - $query=$query." and (". - " firstname like ? or firstname like ? - or othernames like ? or othernames like ?)"; - push(@bind,"$data[$i]%","% $data[$i]%","$data[$i]%","% $data[$i]%"); + $query=$query." and (". + " surname like ? or surname like ? + or firstname like ? or firstname like ? + or othernames like ? or othernames like ?)"; + push(@bind,"$data[$i]%","% $data[$i]%","$data[$i]%","% $data[$i]%","$data[$i]%","% $data[$i]%"); # FIXME - .= <param('member'); +$member =~ s/,//g; #remove any commas from search string my $env; -- 2.39.5