--- a/MenuEditor.st	Mon Jun 29 16:53:30 1998 +0200
+++ b/MenuEditor.st	Mon Jun 29 16:59:23 1998 +0200
@@ -1351,32 +1351,32 @@
            #(
              #(#MenuItem
                 #label: 'Cut'
+                #translateLabel: true
                 #value: #doCut
-                #translateLabel: true
                 #activeHelpKey: #editCut
                 #enabled: #hasValidSelection
                 #shortcutKeyCharacter: #Cut
             )
              #(#MenuItem
                 #label: 'Copy'
+                #translateLabel: true
                 #value: #doCopy
-                #translateLabel: true
                 #activeHelpKey: #editCopy
                 #enabled: #hasValidSelection
                 #shortcutKeyCharacter: #Copy
             )
              #(#MenuItem
                 #label: 'Paste'
+                #translateLabel: true
                 #value: #doPaste
-                #translateLabel: true
                 #activeHelpKey: #editPaste
                 #enabled: #valueOfCanPaste
                 #shortcutKeyCharacter: #Paste
             )
              #(#MenuItem
                 #label: 'Delete'
+                #translateLabel: true
                 #value: #doDelete
-                #translateLabel: true
                 #activeHelpKey: #editDelete
                 #enabled: #hasValidSelection
                 #shortcutKeyCharacter: #Delete
@@ -1386,37 +1386,39 @@
             )
              #(#MenuItem
                 #label: 'Move Up'
+                #translateLabel: true
                 #value: #doStepUp
-                #translateLabel: true
                 #activeHelpKey: #editMoveUp
                 #enabled: #valueOfEnableMovingUpOrDown
+                #labelImage: #(#ResourceRetriever #Icon #upIcon 'Move Up')
             )
              #(#MenuItem
                 #label: 'Move Down'
+                #translateLabel: true
                 #value: #doStepDown
-                #translateLabel: true
                 #activeHelpKey: #editMoveDown
                 #enabled: #valueOfEnableMovingUpOrDown
+                #labelImage: #(#ResourceRetriever #Icon #downIcon 'Move Down')
             )
              #(#MenuItem
                 #label: 'Move In'
+                #translateLabel: true
                 #value: #doStepIn
-                #translateLabel: true
                 #activeHelpKey: #editMoveIn
                 #enabled: #valueOfEnableMovingIn
+                #labelImage: #(#ResourceRetriever #Icon #downRightIcon 'Move In')
             )
              #(#MenuItem
                 #label: 'Move Out'
+                #translateLabel: true
                 #value: #doStepOut
-                #translateLabel: true
                 #activeHelpKey: #editMoveOut
                 #enabled: #valueOfEnableMovingOut
+                #labelImage: #(#ResourceRetriever #Icon #leftDownIcon 'Move Out')
             )
           ) nil
           nil
       )
-
-    "Modified: / 20.5.1998 / 00:37:16 / cg"
 !
 
 menuToolbar