--- a/ImageEditor.st	Thu Feb 03 18:31:08 2000 +0100
+++ b/ImageEditor.st	Thu Feb 03 19:44:49 2000 +0100
@@ -1861,7 +1861,7 @@
 
     editMode isNil ifTrue: [
         editMode := #point asValue.
-        editMode onChangeSend:#value to:[imageEditView editMode:(editMode value)]
+        editMode onChangeEvaluate:[imageEditView editMode:(editMode value)]
     ].
 
     ^editMode
@@ -1874,7 +1874,7 @@
     ifTrue:
     [
         mouseKeyColorMode := 1 asValue.
-        mouseKeyColorMode onChangeSend: #value to: [imageEditView mouseKeyColorMode: mouseKeyColorMode value. self selectionOfColor value: (self listOfColors indexOf: imageEditView selectedColor).]
+        mouseKeyColorMode onChangeEvaluate: [imageEditView mouseKeyColorMode: mouseKeyColorMode value. self selectionOfColor value: (self listOfColors indexOf: imageEditView selectedColor).]
     ].
 
     ^mouseKeyColorMode