--- trunk/run.pl 2006/06/29 21:18:50 541 +++ trunk/run.pl 2006/06/29 23:19:26 547 @@ -226,7 +226,6 @@ foreach my $normalize (@norm_array) { - my $rules; my $normalize_path = $normalize->{path} || $log->logdie("can't find normalize path in config"); $log->logdie("Found '$normalize_path' as normalization file which isn't supported any more!") unless ( $normalize_path =~ m!\.pl$!i ); @@ -287,7 +286,7 @@ if ($marc_fh) { my $marc = new MARC::Record; $marc->encoding( 'utf-8' ); - $marc->add_fields( WebPAC::Normalize::_get_marc21_fields() ); + $marc->add_fields( WebPAC::Normalize::_get_marc_fields() ); print $marc_fh $marc->as_usmarc; }