# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1087989023 -7200
# Node ID 254fc0e37550dfd3e545485de7d04030fe558647
# Parent  4a73301e4eb48d60e0597d0295a2b90b04617ea3
*** empty log message ***

diff -r 4a73301e4eb4 -r 254fc0e37550 ImageEditor.st
--- 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