--- trunk/lib/WebPAC/Normalize.pm	2006/01/02 10:58:26	340
+++ trunk/lib/WebPAC/Normalize.pm	2006/01/07 02:05:55	344
@@ -358,7 +358,7 @@
 			$found_any->{$fld_type} += $found;
 
 			# we will skip delimiter before first occurence of field!
-			push @out, $del unless($found_any == 1);
+			push @out, $del unless($found_any->{$fld_type} == 1);
 			push @out, $tmp;
 		}
 		$f_step++;