/[webpac]/trunk2/lib/WebPac/Index.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk2/lib/WebPac/Index.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 192 by dpavlin, Thu Dec 11 18:00:57 2003 UTC revision 201 by dpavlin, Sat Jan 17 14:00:26 2004 UTC
# Line 161  sub fetch { Line 161  sub fetch {
161                  } else {                  } else {
162                          # if no match is found when searching from beginning                          # if no match is found when searching from beginning
163                          # of word in index, try substring match anywhere                          # of word in index, try substring match anywhere
164                          $sql2 = "select ord from $field where upper(item) like '%'||upper(?)||'%'";                          $sql2 = "select ord from $field where upper(item) like '% '||upper(?)||'%'";
165                          $sth = $self->{dbh}->prepare($sql2) || die "sql2: $sql2; ".$self->{dbh}->errstr();                          $sth = $self->{dbh}->prepare($sql2) || die "sql2: $sql2; ".$self->{dbh}->errstr();
166                          $sth->execute($where) || die "sql2: $sql2; ".$self->{dbh}->errstr();                          $sth->execute($where) || die "sql2: $sql2; ".$self->{dbh}->errstr();
167                          if (my $row = $sth->fetchrow_hashref) {                          if (my $row = $sth->fetchrow_hashref) {

Legend:
Removed from v.192  
changed lines
  Added in v.201

  ViewVC Help
Powered by ViewVC 1.1.26