[Koha-cvs] CVS: koha thesaurus_popup.pl,1.13,1.13.2.1

[MJ Ray]

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

Modified Files:
      Tag: rel_2_0
        thesaurus_popup.pl 
Log Message:
DBI call fix for bug 662.

Index: thesaurus_popup.pl
===================================================================
RCS file: /cvsroot/koha/koha/thesaurus_popup.pl,v
retrieving revision 1.13
retrieving revision 1.13.2.1
diff -C2 -r1.13 -r1.13.2.1
*** thesaurus_popup.pl  28 Nov 2003 14:00:20 -0000      1.13
--- thesaurus_popup.pl  8 Jan 2004 17:06:03 -0000       1.13.2.1
***************
*** 75,80 ****
  if ($search_string) {
  #     my $sti=$dbh->prepare("select id,freelib from bibliothesaurus where 
freelib like '".$search_string."%' and category ='$category'");
!       my $sti=$dbh->prepare("select id,freelib,father from bibliothesaurus 
where match (category,freelib) AGAINST (?) and category ='$category'");
!       $sti->execute($search_string);
        while (my $line=$sti->fetchrow_hashref) {
                $stdlib{$line->{'id'}} = "$line->{'father'} $line->{'freelib'}";
--- 75,80 ----
  if ($search_string) {
  #     my $sti=$dbh->prepare("select id,freelib from bibliothesaurus where 
freelib like '".$search_string."%' and category ='$category'");
!       my $sti=$dbh->prepare("select id,freelib,father from bibliothesaurus 
where match (category,freelib) AGAINST (?) and category =?");
!       $sti->execute($search_string,$category);
        while (my $line=$sti->fetchrow_hashref) {
                $stdlib{$line->{'id'}} = "$line->{'father'} $line->{'freelib'}";