From bc9bf7850e3caff27ed4fb0a29ce357bdc8ed549 Mon Sep 17 00:00:00 2001
From: tipaul <tipaul>
Date: Tue, 8 Apr 2003 12:01:24 +0000
Subject: [PATCH] fix for #222

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

diff --git a/admin/aqbookfund.pl b/admin/aqbookfund.pl
index 63335ab28d..955c2012b0 100755
--- a/admin/aqbookfund.pl
+++ b/admin/aqbookfund.pl
@@ -52,7 +52,7 @@ sub StringSearch  {
 	$searchstring=~ s/\'/\\\'/g;
 	my @data=split(' ',$searchstring);
 	my $count=@data;
-	my $query="select bookfundid,bookfundname,bookfundgroup from aqbookfund where (bookfundid like \"$data[0]%\") order by bookfundid";
+	my $query="select bookfundid,bookfundname,bookfundgroup from aqbookfund where (bookfundname like \"%$data[0]%\") order by bookfundid";
 	my $sth=$dbh->prepare($query);
 	$sth->execute;
 	my @results;
-- 
2.39.2