Parent Directory | Revision Log | Patch
revision 81 by ulpfr, Sat Apr 20 15:01:38 2002 UTC | revision 82 by ulpfr, Mon Apr 22 10:09:34 2002 UTC | |
---|---|---|
# | Line 156 sub is_an_old_index { | Line 156 sub is_an_old_index { |
156 | ||
157 | defined $self->{db} or $self->open; | defined $self->{db} or $self->open; |
158 | $self->sync; | $self->sync; |
159 | my $dbh = $self->{dbh}; # for convenience | my $dbh = $self->{dbh} or return $self->{old_index} = 0; # for convenience |
160 | ||
161 | my $O = pack('C', 0xff)."o"; | my $O = pack('C', 0xff)."o"; |
162 | my ($word, $value) = ($O.$;); # $word and $value are modified by seq! | my ($word, $value) = ($O.$;); # $word and $value are modified by seq! |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |