--- trunk/lib/WebPAC/Input/ISI.pm 2009/09/19 08:41:06 1288 +++ trunk/lib/WebPAC/Input/ISI.pm 2009/09/20 19:05:56 1302 @@ -146,8 +146,10 @@ $log->logdie("expected blank like in ",$arg->{path}, " +$.: $line") unless ( $line eq '' ); } elsif ( $line eq 'EF' ) { last; + } elsif ( $line =~ m{^(\S\S)\s*$} ) { + warn "# $arg->{path} +$. empty |$line|\n"; } else { - $log->logdie("can't parse +$. $arg->{path} : $line"); + $log->logdie("can't parse +$. $arg->{path} |$line|"); } if ( defined $v ) {