--- a/WorkspaceApplication.st	Wed Oct 31 16:48:08 2007 +0100
+++ b/WorkspaceApplication.st	Fri Nov 02 11:08:12 2007 +0100
@@ -305,6 +305,7 @@
                 )
                (MenuItem
                   label: '-'
+                  isVisible: thisIsASmalltalkWorkspace
                 )
                (MenuItem
                   label: 'Tea Timer'
@@ -1879,5 +1880,5 @@
 !WorkspaceApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/WorkspaceApplication.st,v 1.143 2007-10-31 15:48:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/WorkspaceApplication.st,v 1.144 2007-11-02 10:08:12 ca Exp $'
 ! !