--- a/XPMReader.st	Tue Aug 21 17:52:31 2001 +0200
+++ b/XPMReader.st	Wed Aug 22 18:38:44 2001 +0200
@@ -91,7 +91,9 @@
     anImage photometric == #palette ifTrue:[
         anImage colorMap size < 80 ifTrue:[^ true].
     ].
-    ^ anImage usedColors size < 80
+    anImage usedColors size < 80 ifTrue:[^ true].
+    Transcript showCR:'too many colors in image.'.
+    ^ false
 
     "Modified: 27.2.1997 / 12:40:22 / cg"
 !
@@ -546,6 +548,6 @@
 !XPMReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/XPMReader.st,v 1.43 2000-09-05 12:44:17 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/XPMReader.st,v 1.44 2001-08-22 16:38:32 cg Exp $'
 ! !
 XPMReader initialize!