--- a/Color.st	Fri Sep 29 14:45:35 2000 +0200
+++ b/Color.st	Sat Sep 30 17:32:31 2000 +0200
@@ -1138,13 +1138,14 @@
         "(Color colorPaletteForDepth: 16 extent: 190@60) display"
 
         | basicHue x y c startHue palette transHt vSteps transCaption grayWidth hSteps |
-        Smalltalk isSmalltalkX ifTrue:[
+
+"/        Smalltalk isSmalltalkX ifTrue:[
             palette := Image extent:chartExtent depth:24.
             palette photometric:#rgb.
             palette data:(ByteArray new:chartExtent x * chartExtent y * 3).   
-        ] ifFalse:[
-            palette := Form extent: chartExtent depth: depth.
-        ].
+"/        ] ifFalse:[
+"/            palette := Form extent: chartExtent depth: depth.
+"/        ].
         transCaption := "(DisplayText text: 'no color' asText textStyle: (TextConstants at: #ComicPlain)) form storeString"
                 (Form extent: 34@9 depth: 1
                         fromArray: #(0 0 256 0 256 0 3808663859 2147483648 2491688266 2147483648 2491688266 0 2491688266 0 2466486578 0 0 0)
@@ -5127,6 +5128,6 @@
 !Color class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Color.st,v 1.160 2000-09-25 14:03:55 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Color.st,v 1.161 2000-09-30 15:32:31 cg Exp $'
 ! !
 Color initialize!