--- a/NewLauncher.st	Sun Aug 30 13:11:28 1998 +0200
+++ b/NewLauncher.st	Tue Sep 01 11:29:06 1998 +0200
@@ -308,6 +308,9 @@
 #gamesTicTacToe2
 'Play TicTacToe against a friend.'
 
+#helpActiveHelp
+'Toggle display of active help texts in browsers.'
+
 #helpClassDocumentation
 'Show the smalltalk class documentation.'
 
@@ -474,8 +477,6 @@
 'Display the widget hierarchies of all ST/X windows.'
 
 )
-
-    "Modified: / 18.8.1998 / 17:24:28 / cg"
 ! !
 
 !NewLauncher class methodsFor:'image specs'!
@@ -802,7 +803,7 @@
                                     #activeHelpKey: #classesResourceMethods
                                 )
                                  #(#MenuItem
-                                    #label: 'Show All Break && Trace Points'
+                                    #label: 'Show All Break  Trace Points'
                                     #translateLabel: true
                                     #value: #browseAllBreakAndTracePoints
                                     #activeHelpKey: #classesShowTracePoints
@@ -811,7 +812,7 @@
                                     #label: '-'
                                 )
                                  #(#MenuItem
-                                    #label: 'Remove All Break && Trace Points'
+                                    #label: 'Remove All Break  Trace Points'
                                     #translateLabel: true
                                     #value: #removeAllBreakAndTracePoints
                                     #activeHelpKey: #classesRemoveAllTracePoints
@@ -1697,8 +1698,17 @@
                           #label: 'Active Help'
                           #translateLabel: true
                           #value: #toggleActiveHelp:
+                          #activeHelpKey: #helpActiveHelp
+                          #indication: #activeHelp
+                      )
+                       #(#MenuItem
+                          #label: '-'
+                      )
+                       #(#MenuItem
+                          #label: 'Show Help Texts'
+                          #translateLabel: true
                           #activeHelpKey: #helpShowHelp
-                          #indication: #activeHelp
+                          #indication: #showingHelp:
                       )
                     ) nil
                     nil
@@ -1707,8 +1717,6 @@
           ) nil
           nil
       )
-
-    "Modified: / 30.8.1998 / 12:44:36 / cg"
 !
 
 menuToolbar
@@ -3517,5 +3525,5 @@
 !NewLauncher class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.102 1998-08-30 10:45:53 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.103 1998-09-01 09:29:06 tz Exp $'
 ! !