--- a/NewLauncher.st	Fri Feb 11 14:52:24 2000 +0100
+++ b/NewLauncher.st	Sat Feb 12 11:59:11 2000 +0100
@@ -682,6 +682,8 @@
             #label: 'File'
             #translateLabel: true
             #activeHelpKey: #file
+            #shortcutKeyCharacter: #Cmdf
+            #accessCharacterPosition: 1
             #submenu: 
            #(#Menu
               #(
@@ -706,10 +708,10 @@
                #(#MenuItem
                   #label: 'Packages...'
                   #translateLabel: true
+                  #isVisible: #packageDialogVisible
                   #value: #packageDialog
                   #activeHelpKey: #filePackages
                   #enabled: #enableDangerousMenuItemsInRemoteLauncher
-                  #isVisible: #packageDialogVisible
                 )
                #(#MenuItem
                   #label: '-'
@@ -1660,6 +1662,8 @@
             #translateLabel: true
             #startGroup: #right
             #activeHelpKey: #help
+            #shortcutKeyCharacter: #Cmdh
+            #accessCharacterPosition: 1
             #submenu: 
            #(#Menu
               #(
@@ -1733,8 +1737,6 @@
         nil
         nil
       )
-
-    "Modified: / 13.12.1999 / 22:22:32 / cg"
 !
 
 menuToolbar
@@ -2916,5 +2918,5 @@
 !NewLauncher class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.168 2000-02-03 13:58:56 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.169 2000-02-12 10:59:11 cg Exp $'
 ! !