diff -r a093f7005873 -r a4244f890bde Color.st --- 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!