only try to fetch colormap for palette images
authorClaus Gittinger <cg@exept.de>
Fri, 18 Jan 2008 11:28:45 +0100
changeset 4859 553f9013f270
parent 4858 bb9e88541077
child 4860 3fddc6978702
only try to fetch colormap for palette images
Image.st
--- a/Image.st	Thu Jan 17 11:02:02 2008 +0100
+++ b/Image.st	Fri Jan 18 11:28:45 2008 +0100
@@ -5110,10 +5110,10 @@
     height := anImage height.
     bitsPerSample := self bitsPerSample.
     samplesPerPixel := self samplesPerPixel.
-"/    commented because catured images got converted to greyscale images
-"/    photometricOrNil == #palette ifTrue:[
-    self colormapFromImage:anImage photometric:photometricOrNil.
-"/    ].
+
+    photometricOrNil == #palette ifTrue:[
+        self colormapFromImage:anImage photometric:photometricOrNil.
+    ].
     self mask:anImage mask.
 
     samePhotometric := (photometric == anImage photometric).
@@ -12990,7 +12990,7 @@
 !Image class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Image.st,v 1.397 2008-01-17 10:02:02 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Image.st,v 1.398 2008-01-18 10:28:45 cg Exp $'
 ! !
 
 Image initialize!