/[webpac]/trunk/index_DBI_cache.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 /trunk/index_DBI_cache.pm

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

revision 60 by dpavlin, Fri Jul 4 18:23:00 2003 UTC revision 83 by dpavlin, Fri Jul 11 20:14:19 2003 UTC
# Line 99  sub insert { Line 99  sub insert {
99          $index_data = substr($index_data,0,255);          $index_data = substr($index_data,0,255);
100          my $uc = uc($index_data);          my $uc = uc($index_data);
101          if (! $c_table->{$field}->{$ident}->{$uc}) {          if (! $c_table->{$field}->{$ident}->{$uc}) {
102                  $sth_cache{$field."insert"}->execute($index_data,$ident,0) || die "cache: $field insert; ".$self->{dbh}->errstr();                  $sth_cache{$field."insert"}->execute($index_data,$ident,0) || warn "cache: $field insert ($index_data,$ident); ".$self->{dbh}->errstr();
103  #print stderr "in index: $index_data\n";  #print stderr "in index: $index_data\n";
104                  $c_table->{$field}->{$ident}->{$uc} = $index_data;                  $c_table->{$field}->{$ident}->{$uc} = $index_data;
105                  $c_count->{$field}->{$ident}->{$uc} = 1;                  $c_count->{$field}->{$ident}->{$uc} = 1;

Legend:
Removed from v.60  
changed lines
  Added in v.83

  ViewVC Help
Powered by ViewVC 1.1.26