--- trunk/lib/WebPAC/Normalize.pm 2006/12/10 12:45:11 786 +++ trunk/lib/WebPAC/Normalize.pm 2006/12/10 12:56:59 788 @@ -661,6 +661,7 @@ if ($f eq '*') { delete( $marc_record->[ $marc_record_offset ] ); + warn "## full marc_record = ", dump( @{ $marc_record }), $/ if ($debug > 1); } else { @@ -699,7 +700,6 @@ $marc_record->[ $marc_record_offset ] = $marc; } - warn "## full marc_record = ", dump( @{ $marc_record }), $/ if ($debug > 1); }