--- trunk/all2xml.pl	2004/04/18 00:57:39	320
+++ trunk2/all2xml.pl	2004/06/10 19:22:40	337
@@ -168,6 +168,8 @@
 			($s,$se,$d,$i) = (0,1,0,0);
 		} elsif (lc($type) =~ /^lookup/) {
 			($s,$se,$d,$i,$il) = (0,1,0,0,1);
+		} elsif ($type) {
+			print STDERR "WARNING: unknown type: $type\n";
 		}
 		return ($s,$se,$d,$i,$il);
 	}