--- a/MenuEditor.st	Fri Mar 26 12:08:53 2004 +0100
+++ b/MenuEditor.st	Mon Mar 29 15:47:38 2004 +0200
@@ -418,11 +418,20 @@
 
     ^ #(
 
+#editCut
+'Cut Item'
+
+#editCopy
+'Copy Item'
+
+#editPaste
+'Paste Item'
+
 #fileLoad
-'Load Spec from Class'
+'Load Spec from Method'
 
 #fileSave
-'Save Spec'
+'Save Spec As Method'
 
 #fileSaveAs
 'Save Spec As'
@@ -1118,7 +1127,9 @@
             translateLabel: true
             isButton: true
             submenuChannel: menuHistory
-            labelImage: (ResourceRetriever ToolbarIconLibrary load22x22Icon)
+            labelImage: (ResourceRetriever ToolbarIconLibrary loadFromMethod22x22Icon)
+            keepLinkedMenu: true
+            horizontalLayout: true
           )
          (MenuItem
             activeHelpKey: fileSave
@@ -1138,7 +1149,7 @@
             itemValue: doCut
             translateLabel: true
             isButton: true
-            labelImage: (ResourceRetriever ToolbarIconLibrary cut22x22Icon)
+            labelImage: (ResourceRetriever ToolbarIconLibrary cutMenuItem22x22Icon)
           )
          (MenuItem
             activeHelpKey: editCopy
@@ -1147,7 +1158,7 @@
             itemValue: doCopy
             translateLabel: true
             isButton: true
-            labelImage: (ResourceRetriever ToolbarIconLibrary copy22x22Icon)
+            labelImage: (ResourceRetriever ToolbarIconLibrary copyMenuItem22x22Icon)
           )
          (MenuItem
             activeHelpKey: editPaste
@@ -1156,7 +1167,7 @@
             itemValue: doPaste
             translateLabel: true
             isButton: true
-            labelImage: (ResourceRetriever ToolbarIconLibrary paste22x22Icon)
+            labelImage: (ResourceRetriever ToolbarIconLibrary pasteMenuItem22x22Icon)
           )
          (MenuItem
             label: ''
@@ -1188,6 +1199,8 @@
             isButton: true
             submenuChannel: standardMenus
             labelImage: (ResourceRetriever #'MenuEditor::Item' iconMenu)
+            keepLinkedMenu: true
+            horizontalLayout: true
           )
          (MenuItem
             activeHelpKey: addSubMenuLink