--- a/WorkspaceApplication.st	Wed May 07 18:09:45 2008 +0200
+++ b/WorkspaceApplication.st	Wed May 07 20:34:41 2008 +0200
@@ -193,6 +193,10 @@
             translateLabel: true
           )
          (MenuItem
+            label: '-'
+            isVisible: thisIsASmalltalkWorkspace
+          )
+         (MenuItem
             label: 'Add Buffer on MyWorkspace'
             itemValue: addMyWorkspace
             translateLabel: true
@@ -243,6 +247,19 @@
             label: '-'
           )
          (MenuItem
+            label: 'Tea Timer'
+            itemValue: addTeaTimer
+            translateLabel: true
+          )
+         (MenuItem
+            label: 'Stop Watch'
+            itemValue: addStopWatch
+            translateLabel: true
+          )
+         (MenuItem
+            label: '-'
+          )
+         (MenuItem
             label: 'Rename...'
             itemValue: renameWorkspace
             translateLabel: true
@@ -437,20 +454,6 @@
                     nil
                   )
                 )
-               (MenuItem
-                  label: '-'
-                  isVisible: thisIsASmalltalkWorkspace
-                )
-               (MenuItem
-                  label: 'Tea Timer'
-                  itemValue: addTeaTimer
-                  translateLabel: true
-                )
-               (MenuItem
-                  label: 'Stop Watch'
-                  itemValue: addStopWatch
-                  translateLabel: true
-                )
                )
               nil
               nil
@@ -2232,5 +2235,5 @@
 !WorkspaceApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/WorkspaceApplication.st,v 1.148 2008-05-07 07:53:48 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/WorkspaceApplication.st,v 1.149 2008-05-07 18:34:41 cg Exp $'
 ! !