hg/stx-libwidg2: comparison ImageSelectionBox.st

equal deleted inserted replaced

-:23dd09b9fbdf
+:4979c1304456
 	classVariableNames:''
 	poolDictionaries:''
 	category:'Views-DialogBoxes'
 !
-!ImageSelectionBox class methodsFor:'documentation'!
+!ImageSelectionBox  class methodsFor:'documentation'!
 copyright
 "
 COPYRIGHT (c) 1995 by Claus Gittinger
 	      All Rights Reserved
 for the thumbNail picture,
 we can temporarily switch to a rough dither.
 (this speeds up the thing quite a bit
 "
 (image depth > 2
-and:[Color fixColors isNil]) ifTrue:[
+and:[device fixColors isNil]) ifTrue:[
 "temporarily go to a 3x3x2 colormap ..."
 Object errorSignal handle:[:ex |
 'very low resolution colors' infoPrintNL.
 Object errorSignal handle:[:ex |
 'cannot allocate dither colors' infoPrintNL.
 ex return
 ] do:[
-Color getColorsRed:2 green:2 blue:2.
+Color getColorsRed:2 green:2 blue:2 on:device.
 ]
 ] do:[
-Color getColorsRed:5 green:5 blue:3.
+Color getColorsRed:5 green:5 blue:3 on:device.
 ].
 previewField label:image.
-Color releaseDitherColors.
+device releaseFixColors.
 ] ifFalse:[
 previewField label:image.
 ]
 ]
 ]
 ]
 "Modified: 7.6.1996 / 12:25:19 / cg"
 ! !
-!ImageSelectionBox class methodsFor:'documentation'!
+!ImageSelectionBox  class methodsFor:'documentation'!
 version
-^ '$Header: /cvs/stx/stx/libwidg2/ImageSelectionBox.st,v 1.4 1996-06-07 16:35:50 cg Exp $'
+^ '$Header: /cvs/stx/stx/libwidg2/ImageSelectionBox.st,v 1.5 1996-08-02 19:03:37 cg Exp $'
 ! !