[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'}";