--- a/ImageEditor.st	Tue Jun 22 09:38:21 2004 +0200
+++ b/ImageEditor.st	Wed Jun 23 13:10:23 2004 +0200
@@ -4130,7 +4130,7 @@
     modifiedColormap := cMap asArray copy.
 
     newColor := aBlock value:oldColor.
-    modifiedColormap at:selectedColorIndex put:(aBlock value:oldColor).
+    modifiedColormap at:selectedColorIndex put:newColor.
 
     newImage := img species new
                     width:img width