WorkspaceApplication.st
changeset 8508 34480c5b32d2
parent 8506 45f668254d30
child 8529 8d2391313df2
--- a/WorkspaceApplication.st	Sat Dec 20 00:03:00 2008 +0100
+++ b/WorkspaceApplication.st	Sat Dec 20 00:21:59 2008 +0100
@@ -525,7 +525,7 @@
             label: 'Cut'
             itemValue: cutSelection
             translateLabel: true
-            labelImage: (ResourceRetriever ToolbarIconLibrary cut16x16Icon2)
+            labelImage: (ResourceRetriever ToolbarIconLibrary cut16x16Icon)
             isButton: true
           )
          (MenuItem
@@ -548,6 +548,25 @@
             label: '-'
           )
          (MenuItem
+            activeHelpKey: editUndo
+            label: 'Undo'
+            itemValue: undo
+            translateLabel: true
+            labelImage: (ResourceRetriever ToolbarIconLibrary undo16x16Icon)
+            isButton: true
+          )
+         (MenuItem
+            activeHelpKey: editRedo
+            label: 'Redo'
+            itemValue: redo
+            translateLabel: true
+            labelImage: (ResourceRetriever ToolbarIconLibrary redo16x16Icon)
+            isButton: true
+          )
+         (MenuItem
+            label: '-'
+          )
+         (MenuItem
             activeHelpKey: editSearch
             label: 'Search'
             itemValue: search
@@ -559,6 +578,14 @@
             label: '-'
           )
          (MenuItem
+            activeHelpKey: doUndent
+            label: 'Undent'
+            itemValue: undent
+            translateLabel: true
+            isButton: true
+            labelImage: (ResourceRetriever ToolbarIconLibrary undent16x16Icon)
+          )
+         (MenuItem
             activeHelpKey: doIndent
             label: 'Indent'
             itemValue: indent
@@ -566,14 +593,6 @@
             isButton: true
             labelImage: (ResourceRetriever ToolbarIconLibrary indent16x16Icon)
           )
-         (MenuItem
-            activeHelpKey: doUndent
-            label: 'Undent'
-            itemValue: undent
-            translateLabel: true
-            isButton: true
-            labelImage: (ResourceRetriever ToolbarIconLibrary undent16x16Icon)
-          )
          )
         nil
         nil
@@ -2498,5 +2517,5 @@
 !WorkspaceApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/WorkspaceApplication.st,v 1.172 2008-12-19 23:02:55 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/WorkspaceApplication.st,v 1.173 2008-12-19 23:21:59 cg Exp $'
 ! !