# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1123251962 -7200
# Node ID 73fb270a4da9b79d598c480d20f1d63923c93974
# Parent  e2ce1a4139a23e93ca27eb043160e3b0eda7a9f0
*** empty log message ***

diff -r e2ce1a4139a2 -r 73fb270a4da9 ImageEditor.st
--- a/ImageEditor.st	Fri Aug 05 16:09:21 2005 +0200
+++ b/ImageEditor.st	Fri Aug 05 16:26:02 2005 +0200
@@ -3854,7 +3854,7 @@
         ((prevMode = aMode)
         or:[depth > oldImage depth
         or:[self confirm:(resources string:quest)]]) ifTrue:[
-            (newColorMap isFixedPalette) ifFalse:[
+            (newColorMap isOrderedCollection or:[newColorMap isFixedPalette not]) ifTrue:[
 
                 "/ keep the colormap
                 newColorMap atAllPut:Color black.
@@ -4000,7 +4000,7 @@
             image mask: nil.
         ]. 
 
-        newColorMap isFixedPalette ifFalse:[
+        (newColorMap isOrderedCollection or:[newColorMap isFixedPalette not]) ifTrue:[
             realColorMap := OrderedCollection new.
             image realColorMap do:[:clr|
                 (realColorMap includes: clr) ifFalse: [realColorMap add: clr]