--- trunk/parse_format.pm	2004/03/29 19:41:12	293
+++ branches/cpi/parse_format.pm	2004/05/18 17:41:14	331
@@ -224,7 +224,7 @@
 		} elsif ($format =~ s/^([^A-Z\|]+)(\|[A-Z]{1,2}\|)/$2/) {
 			$prefix .= $1 if ($display);
 		} else {
-			print STDERR "unparsed format: $format\n";
+			#print STDERR "unparsed format: $format\n";
 			$prefix .= $format;
 			$format = "";
 		}