--- a/ImageEditor.st	Thu Jul 23 18:37:31 1998 +0200
+++ b/ImageEditor.st	Sat Jul 25 19:21:03 1998 +0200
@@ -187,82 +187,85 @@
 'Shows a list of used colors of the image.'
 
 #drawModeBox
-'Switches to mode drawing boxes.'
+'Switches to box-drawing mode.'
 
 #drawModeCopy
-'Switches to mode copying areas.'
+'Switches to area-copy mode.'
 
 #drawModeFill
-'Switches to mode filling areas around selected point.'
+'Switches to flood-fill mode.'
 
 #drawModeFilledBox
-'Switches to mode drawing filled boxes.'
+'Switches to filled-box drawing mode.'
 
 #drawModePaste
-'Switches to mode pasting areas at selected point.'
+'Switches to paste mode.'
+
+#drawModePasteUnder
+'Switches to paste under mode.'
 
 #drawModePoint
-'Switches to mode drawing points.'
+'Switches to point-drawing mode.'
 
 #editFlipHorizontal
-'Flips horizontally the image.'
+'Flips the image horizontally.'
 
 #editFlipVertical
-'Flips vertically the image.'
+'Flips the image vertically.'
 
 #editMagnifyImage
-'Opens a dialog to magnify the image.'
+'Magnify the image.'
 
 #editNegate
-'Convertes colors of image by negating them.'
+'Invert the images colors.'
 
 #editResize
-'Opens a dialog to resize the image with preserving the old image.'
+'Resize the image (preserving the old image).'
 
 #editRotate
-'Opens a dialog to rotate the image in degrees.'
+'Rotate the image.'
 
 #fileLoadFromClass
-'Opens a dialog for selecting and loading an image from resource method of a class.'
+'Selecting and load an image from a resource method.'
 
 #fileLoadFromFile
-'Opens a dialog for selecting and loading an image from a file.'
+'Selecting and load an image from a file.'
 
 #fileNewImage
-'Opens a dialog with choices of size and color depth to create an new image.'
+'Create a new image'
 
 #filePrint
 'Print the image on a postscript printer.'
 
 #fileSaveAs
-'Opens a dialog to save the image to a file.'
+'Save the image to a file.'
 
 #fileSaveMaskAs
-'Opens a dialog to save the mask of the image to a file.'
+'Save the mask of the image to a file.'
 
 #fileSaveMethod
-'Saves the image on current class and selector.'
+'Save the image as resource method in the current class and selector.'
 
 #fileSaveMethodAs
-'Opens a dialog for selecting and saving the image in a resource method of a class.'
+'Save the image as resource method in a class.'
 
 #magnificationNumber
-'Shows current number of magnification.'
+'Shows the current magnification.'
 
 #magnifyImageDown
-'Magnifies down the image.'
+'Decrease magnification.'
 
 #magnifyImageUp
-'Magnifies up the image.'
+'Increase magnification.'
 
 #mouseKeyColorMode
-'Switches between left and right mouse button color.'
+'Toggles between left and right mouse button color.'
 
 #previewView
-'Shows preview of the image.'
+'Shows a preview of the image.'
 
 #settingsGridMagnification
-'Opens a dialog to change the grid magnification of the edit view.'
+'Change the grid magnification of the edit view.'
 
 )
 ! !
@@ -1031,6 +1034,13 @@
                 #argument: 'paste'
                 #indication: #editMode:value:
             )
+             #(#MenuItem
+                #label: 'Paste Under'
+                #activeHelpKey: #drawModePasteUnder
+                #enabled: #imageIsLoaded
+                #argument: 'pasteUnder'
+                #indication: #editMode:value:
+            )
           ) nil
           nil
       )