--- trunk/lib/WebPAC/Normalize.pm	2007/11/12 11:17:19	1037
+++ trunk/lib/WebPAC/Normalize.pm	2007/11/19 16:33:09	1048
@@ -263,7 +263,6 @@
 	warn "debug level $l",$/ if ($l > 0);
 	$debug = $l;
 	$WebPAC::Normalize::MARC::debug = $debug;
-warn "#### MARC::debug = ",dump($WebPAC::Normalize::MARC::debug);
 }
 
 =head1 Functions to create C<data_structure>
@@ -450,7 +449,7 @@
 		} else {
 			$_->{$sf};
 		}
-	} grep { ref($_) eq 'HASH' && $_->{$sf} } @{ $rec->{$f} };
+	} grep { ref($_) eq 'HASH' && defined $_->{$sf} } @{ $rec->{$f} };
 }
 
 =head2 rec