--- trunk/lib/WebPAC/Input/ISIS.pm 2005/12/15 14:12:00 251 +++ trunk/lib/WebPAC/Input/ISIS.pm 2005/12/16 16:23:44 265 @@ -76,8 +76,6 @@ $log->logcroak("need filename") if (! $arg->{'filename'}); my $code_page = $arg->{'code_page'} || '852'; - #$log->logdie("can't find database ",$arg->{'filename'}) unless (glob($arg->{'filename'}.'.*')); - # store data in object $self->{'isis_code_page'} = $code_page; foreach my $v (qw/isis_filename start_mfn limit_mfn/) { @@ -107,7 +105,8 @@ $l = $cp->convert($l); return $l; }, - ); + ) or $log->logdie("can't find database ",$arg->{'filename'}); + $db_size = $isis_db->count; unless ($db_size) {