/[webpac2]/trunk/lib/WebPAC/Input/MARC.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/lib/WebPAC/Input/MARC.pm

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

revision 290 by dpavlin, Sun Dec 18 23:10:02 2005 UTC revision 291 by dpavlin, Sun Dec 18 23:34:24 2005 UTC
# Line 77  sub fetch_rec { Line 77  sub fetch_rec {
77                  $self->_get_logger()->warn("seek beyond database size $self->{size} to $mfn");                  $self->_get_logger()->warn("seek beyond database size $self->{size} to $mfn");
78          } else {          } else {
79                  my $row = $db->fetch($mfn);                  my $row = $db->fetch($mfn);
80                  $row->{'000'}->[0] = $mfn;                  push @{$row->{'000'}}, $mfn;
81                  return $row;                  return $row;
82          }          }
83  }  }
Legend:
Removed from v.290  
changed lines
  Added in v.291
  ViewVC Help
Powered by ViewVC 1.1.26