Image.st
changeset 4893 137719991c5a
parent 4888 7d2d5ef445e3
child 4937 1b0ebaed9336
--- a/Image.st	Mon Feb 04 13:25:54 2008 +0100
+++ b/Image.st	Mon Feb 04 13:26:25 2008 +0100
@@ -5110,7 +5110,8 @@
     samplesPerPixel := self samplesPerPixel.
 
     photometricOrNil isNil ifTrue:[
-        photometric := anImage photometric
+        photometric := self class defaultPhotometric
+        "/ photometric := anImage photometric
     ] ifFalse:[
         photometric := photometricOrNil
     ].
@@ -12994,7 +12995,7 @@
 !Image class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Image.st,v 1.399 2008-01-27 16:07:53 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Image.st,v 1.400 2008-02-04 12:26:25 cg Exp $'
 ! !
 
 Image initialize!