--- trunk/IsisDB.pm 2004/12/30 22:40:53 18 +++ trunk/IsisDB.pm 2004/12/30 23:16:20 19 @@ -148,7 +148,7 @@ push @must_exist, "fdt" if ($self->{read_fdt}); foreach my $ext (@must_exist) { - confess "missing ",uc($ext)," file in ",$self->{isisdb} unless ($self->{$ext."_file"}); + croak "missing ",uc($ext)," file in ",$self->{isisdb} unless ($self->{$ext."_file"}); } print STDERR "## using files: ",join(" ",@isis_files),"\n" if ($self->{debug}); @@ -224,7 +224,7 @@ sub read_cnt { my $self = shift; - confess "missing CNT file in ",$self->{isisdb} unless ($self->{cnt_file}); + croak "missing CNT file in ",$self->{isisdb} unless ($self->{cnt_file}); # Get the index information from $db.CNT