new api version
[Biblio-Isis] / scripts / dump_isisdb.pl
index adbc250..0a5fb51 100755 (executable)
@@ -16,9 +16,9 @@ my $isis = IsisDB->new (
 #      read_fdt => 1,
 );
 
-print "rows: ",$isis->{'maxmfn'},"\n\n";
+print "rows: ",$isis->count,"\n\n";
 
-for(my $mfn = 1; $mfn <= $isis->{'maxmfn'}; $mfn++) {
+for(my $mfn = 1; $mfn <= $isis->count; $mfn++) {
        print STDERR Dumper($isis->to_hash($mfn)),"\n" if ($debug);
        print $isis->to_ascii($mfn),"\n";