[Koha-cvs] CVS: koha/admin aqbookfund.pl,1.12,1.13

[Paul POULAIN]

Update of /cvsroot/koha/koha/admin
In directory sc8-pr-cvs1:/tmp/cvs-serv31609/admin

Modified Files:
        aqbookfund.pl 
Log Message:
fix for #222

Index: aqbookfund.pl
===================================================================
RCS file: /cvsroot/koha/koha/admin/aqbookfund.pl,v
retrieving revision 1.12
retrieving revision 1.13
diff -C2 -r1.12 -r1.13
*** aqbookfund.pl       2 Feb 2003 07:18:38 -0000       1.12
--- aqbookfund.pl       8 Apr 2003 12:01:24 -0000       1.13
***************
*** 53,57 ****
        my @data=split(' ',$searchstring);
        my address@hidden;
!       my $query="select bookfundid,bookfundname,bookfundgroup from aqbookfund 
where (bookfundid like \"$data[0]%\") order by bookfundid";
        my $sth=$dbh->prepare($query);
        $sth->execute;
--- 53,57 ----
        my @data=split(' ',$searchstring);
        my address@hidden;
!       my $query="select bookfundid,bookfundname,bookfundgroup from aqbookfund 
where (bookfundname like \"%$data[0]%\") order by bookfundid";
        my $sth=$dbh->prepare($query);
        $sth->execute;