--- a/ImageEditor.st Mon Sep 10 16:16:42 2001 +0200
+++ b/ImageEditor.st Thu Sep 13 10:34:51 2001 +0200
@@ -1011,9 +1011,10 @@
#submenuChannel: #menuAbout
)
#(#MenuItem
- #label: 'File'
+ #label: '&File'
#translateLabel: true
#activeHelpKey: #file
+ #shortcutKeyCharacter: #Cmdf
#submenu:
#(#Menu
#(
@@ -1256,12 +1257,12 @@
nil
)
)
- #(#MenuItem
- #label: 'Ungrop (Add Border)...'
- #translateLabel: true
- #value: #doUnCropManual
- #activeHelpKey: #uncropManual
- )
+ #(#MenuItem
+ #label: 'Ungrop (Add Border)...'
+ #translateLabel: true
+ #value: #doUnCropManual
+ #activeHelpKey: #uncropManual
+ )
)
nil
nil