~ubuntu-branches/ubuntu/trusty/bioperl/trusty

« back to all changes in this revision

Viewing changes to Bio/DB/Flat/BDB.pm

  • Committer: Package Import Robot
  • Author(s): Charles Plessy
  • Date: 2014-01-18 11:41:11 UTC
  • mfrom: (3.1.12 sid)
  • Revision ID: package-import@ubuntu.com-20140118114111-zcjaq5edb49dhlat
Tags: 1.6.923-1
* New upstream release.
* Does not need non-free libmath-random-perl anymore.
* Build-depend on libmodule-build-perl (>= 0.420000).  Despite Lintian's
  warning that it is useless, the package does not build without.
* Conforms to Policy version 3.9.5.

Show diffs side-by-side

added added

removed removed

Lines of Context:
241
241
  my $fh     = $self->_fhcache($file) or $self->throw("could not open $file for indexing: $!");
242
242
  my $offset = 0;
243
243
  my $count  = 0;
 
244
 
244
245
  while (!eof($fh)) {
245
246
    my ($ids,$adjustment)  = $self->parse_one_record($fh) or next;
246
247
    $adjustment ||= 0;  # prevent uninit variable warning