/[webpac]/trunk/all2xml.pl
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/all2xml.pl

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

revision 672 by dpavlin, Thu Feb 17 18:08:14 2005 UTC revision 673 by dpavlin, Thu Feb 17 18:11:57 2005 UTC
# Line 742  print STDERR "using: $type...\n"; Line 742  print STDERR "using: $type...\n";
742                  $import2cp = Text::Iconv->new($config->{isis_codepage},$codepage);                  $import2cp = Text::Iconv->new($config->{isis_codepage},$codepage);
743                  my $db = new Biblio::Isis( isisdb => $isis_db );                  my $db = new Biblio::Isis( isisdb => $isis_db );
744    
745                  my $max_rowid = $db->count if ($db);                  if (! $db) {
   
                 if (! $max_rowid) {  
746                          print STDERR "FATAL: can't read ISIS database: $isis_db, skipping...\n";                          print STDERR "FATAL: can't read ISIS database: $isis_db, skipping...\n";
747                          next;                          next;
748                  }                  }
749    
750                    my $max_rowid = $db->count if ($db);
751    
752                  print STDERR "Reading database: $isis_db [$max_rowid rows]\n";                  print STDERR "Reading database: $isis_db [$max_rowid rows]\n";
753    
754                  for (my $row_id = 1; $row_id <= $max_rowid; $row_id++ ) {                  for (my $row_id = 1; $row_id <= $max_rowid; $row_id++ ) {

Legend:
Removed from v.672  
changed lines
  Added in v.673

  ViewVC Help
Powered by ViewVC 1.1.26