# HG changeset patch
# User tz
# Date 901039943 -7200
# Node ID ce482227787dcd58cb5e15d6caa38c94e524e3f6
# Parent  5dd8303a9bb5fc83ec2e1178d6e13da6be523e33
several undos

diff -r 5dd8303a9bb5 -r ce482227787d ImageEditor.st
--- a/ImageEditor.st	Tue Jul 21 14:17:51 1998 +0200
+++ b/ImageEditor.st	Tue Jul 21 18:52:23 1998 +0200
@@ -771,15 +771,6 @@
                           #value: #doRotateImage
                           #activeHelpKey: #editRotate
                       )
-                       #(#MenuItem
-                          #label: '-'
-                      )
-                       #(#MenuItem
-                          #label: 'Negative'
-                          #translateLabel: true
-                          #value: #doNegativeImage
-                          #activeHelpKey: #editNegate
-                      )
                     ) nil
                     nil
                 )
@@ -888,8 +879,6 @@
           ) nil
           nil
       )
-
-    "Modified: / 20.5.1998 / 04:07:41 / cg"
 !
 
 menuMouseButtonColors
@@ -1296,10 +1285,13 @@
 
     |depth newColorMap newImage image newColors realColorMap oldFileName| 
 
+    self imageEditView makeUndo.
+
     newColorMap := self class listOfColorMaps at: aMode.
-    depth := (newColorMap size log: 2) asInteger. 
-    newImage := (Image implementorForDepth: depth) new.  
+    depth       := (newColorMap size log: 2) asInteger. 
+    newImage    := (Image implementorForDepth: depth) new.  
     oldFileName := self image fileName.
+
     Object errorSignal handle:
     [:ex|
         Object errorSignal handle:
@@ -1321,6 +1313,7 @@
     [ 
         image := newImage fromImage: self image
     ].
+
     (String fromString: aMode) reverse readStream nextWord reverse = 'mask'
     ifTrue:
     [
@@ -1347,9 +1340,9 @@
         [      
             newColors add: clr
         ]
-    ].       
+    ].                  
     image colorMap: newColors.
-    colorMapMode := aMode.
+    colorMapMode := aMode.            
     (self imageEditView image: image) notNil
     ifTrue:
     [
@@ -1507,7 +1500,8 @@
 
     self imageEditView negativeImage.
     self listOfColors removeAll.
-    self findColorMapMode     
+    self findColorMapMode.     
+    self imageEditView undoImages removeLast
 !
 
 doResizeImage