--- a/OldLauncher.st	Mon Sep 10 14:34:08 2001 +0200
+++ b/OldLauncher.st	Mon Sep 10 15:45:26 2001 +0200
@@ -10,6 +10,8 @@
  hereby transferred.
 "
 
+"{ Package: 'stx:libtool' }"
+
 StandardSystemView subclass:#OldLauncher
 	instanceVariableNames:'myMenu logoLabel'
 	classVariableNames:''
@@ -292,13 +294,13 @@
     myMenu subMenuAt:#browserMenu put:(
         PopUpMenu labels:(resources array:#(
                             'System Browser'
-                            'Class Hierarchy Browser'
-                            'Implementors'
-                            'Senders'
+                            'Class Hierarchy...'
+                            'Implementors...'
+                            'Senders...'
                             '-'
                             'Changes Browser'
                             '-'
-                            'Directory Browser'
+                            'Directory'
                            ))
                selectors:#(
                             startSystemBrowser
@@ -796,6 +798,11 @@
     enterBox showAtPointer
 !
 
+startNewLauncher
+    NewLauncher open.
+    super destroy
+!
+
 startSendersBrowser
     |enterBox|
 
@@ -1039,5 +1046,5 @@
 !OldLauncher class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/OldLauncher.st,v 1.41 1999-04-15 12:50:45 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/OldLauncher.st,v 1.42 2001-09-10 13:45:26 cg Exp $'
 ! !