diff --git a/collects/framework/private/standard-menus-items.rkt b/collects/framework/private/standard-menus-items.rkt index 1e4ac97ca6..557b3e1c06 100644 --- a/collects/framework/private/standard-menus-items.rkt +++ b/collects/framework/private/standard-menus-items.rkt @@ -363,11 +363,12 @@ (make-an-item 'edit-menu 'find-from-selection '(string-constant find-info) '(λ (item control) (void)) - #\f - '(cons (if (eq? (system-type) 'macosx) - 'option - 'alt ) - (get-default-shortcut-prefix)) + '(if (eq? (system-type) 'macosx) + #\f + #f) + '(if (eq? (system-type) 'macosx) + (cons 'option (get-default-shortcut-prefix)) + (get-default-shortcut-prefix)) '(string-constant find-from-selection-menu-item) edit-menu:edit-target-on-demand #f) diff --git a/collects/string-constants/private/english-string-constants.rkt b/collects/string-constants/private/english-string-constants.rkt index cc865f047c..4cff790ece 100644 --- a/collects/string-constants/private/english-string-constants.rkt +++ b/collects/string-constants/private/english-string-constants.rkt @@ -737,7 +737,7 @@ please adhere to these guidelines: (select-all-menu-item "Select A&ll") (find-menu-item "Find") ;; menu item - (find-from-selection-menu-item "Find From Selection") + (find-from-selection-menu-item "Find From S&election") (find-info "Toggles the keyboard focus between the window being searched and the search bar") (find-next-info "Skip to the next occurrence of the string in the find window")