--- a/NewLauncher.st	Fri Feb 09 18:53:03 2001 +0100
+++ b/NewLauncher.st	Sat Feb 10 11:39:16 2001 +0100
@@ -1705,6 +1705,7 @@
             #activeHelpKey: #settings
             #labelImage: #(#ResourceRetriever nil #menuIcon)
             #submenuChannel: #aboutMenu
+            #keepLinkedMenu: true
           )
          #(#MenuItem
             #label: '&File'
@@ -1712,6 +1713,7 @@
             #nameKey: #file
             #activeHelpKey: #settings
             #submenuChannel: #fileMenu
+            #keepLinkedMenu: true
           )
          #(#MenuItem
             #label: 'Classes'
@@ -1719,6 +1721,7 @@
             #nameKey: #classes
             #activeHelpKey: #settings
             #submenuChannel: #classesMenu
+            #keepLinkedMenu: true
           )
          #(#MenuItem
             #label: 'Tools'
@@ -1726,6 +1729,7 @@
             #nameKey: #tools
             #activeHelpKey: #settings
             #submenuChannel: #toolsMenu
+            #keepLinkedMenu: true
           )
          #(#MenuItem
             #label: 'System'
@@ -1733,6 +1737,7 @@
             #nameKey: #system
             #activeHelpKey: #settings
             #submenuChannel: #systemMenu
+            #keepLinkedMenu: true
           )
          #(#MenuItem
             #label: 'Settings'
@@ -1740,6 +1745,7 @@
             #nameKey: #settings
             #activeHelpKey: #settings
             #submenuChannel: #settingsMenu
+            #keepLinkedMenu: true
           )
          #(#MenuItem
             #label: 'Windows'
@@ -1747,6 +1753,7 @@
             #nameKey: #windows
             #activeHelpKey: #settings
             #submenuChannel: #windowsMenu
+            #keepLinkedMenu: true
           )
          #(#MenuItem
             #label: 'Demos'
@@ -1754,6 +1761,7 @@
             #nameKey: #demos
             #activeHelpKey: #settings
             #submenuChannel: #demosMenu
+            #keepLinkedMenu: true
           )
          #(#MenuItem
             #label: '&Help'
@@ -1762,6 +1770,7 @@
             #startGroup: #right
             #activeHelpKey: #settings
             #submenuChannel: #helpMenu
+            #keepLinkedMenu: true
           )
          )
         nil
@@ -3757,5 +3766,5 @@
 !NewLauncher class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.213 2001-01-08 18:45:28 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.214 2001-02-10 10:39:16 cg Exp $'
 ! !