[Koha-cvs] CVS: koha/value_builder unimarc_field_700_701_702.pl,1.4,1.5

[Paul POULAIN]

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

Modified Files:
        unimarc_field_700_701_702.pl 
Log Message:
bugfix : use of '$var' instead of ? in sql statement

Index: unimarc_field_700_701_702.pl
===================================================================
RCS file: /cvsroot/koha/koha/value_builder/unimarc_field_700_701_702.pl,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -r1.4 -r1.5
*** unimarc_field_700_701_702.pl        27 Feb 2003 16:58:03 -0000      1.4
--- unimarc_field_700_701_702.pl        25 Oct 2003 08:50:39 -0000      1.5
***************
*** 122,127 ****
        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 from bibliothesaurus 
where match (category,freelib) AGAINST ('$search_string') and category ='NP'");
!               $sti->execute;
                while (my $line=$sti->fetchrow_hashref) {
                        $stdlib{$line->{'id'}} = "$line->{'freelib'}";
--- 122,127 ----
        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 from bibliothesaurus 
where match (category,freelib) AGAINST (?) and category ='NP'");
!               $sti->execute($search_string);
                while (my $line=$sti->fetchrow_hashref) {
                        $stdlib{$line->{'id'}} = "$line->{'freelib'}";