--- trunk/lib/WebPAC/Normalize.pm 2005/12/19 15:34:47 295 +++ trunk/lib/WebPAC/Normalize.pm 2005/12/20 23:31:37 312 @@ -157,7 +157,7 @@ $log->debug("data_structure rec = ", sub { Dumper($rec) }); - $log->logdie("need unique ID (mfn) in field 000 of record ", sub { Dumper($rec) } ) unless (defined($rec->{'000'})); + $log->logdie("need unique ID (mfn) in field 000 of record " . Dumper($rec) ) unless (defined($rec->{'000'})); my $id = $rec->{'000'}->[0] || $log->logdie("field 000 isn't array!");