set the save-as menu shortcut to s and the prefix to shift

original commit: 3b4ba31d741d58e118e4b32c70bfd0f24cd2dd31
2011-03-25 20:17:56 -05:00 · 2011-03-25 20:17:56 -05:00 · 336a550a1e
commit 336a550a1e
parent 3574ae0192
1 changed files with 2 additions and 2 deletions
--- a/collects/framework/private/standard-menus-items.rkt
+++ b/collects/framework/private/standard-menus-items.rkt
@ -245,8 +245,8 @@
        (make-an-item 'file-menu 'save-as
                      '(string-constant save-as-info)
                      '(λ (item control) (void))
-                      #f
-                      '(get-default-shortcut-prefix)
+                      #\s
+                      '(cons 'shift (get-default-shortcut-prefix))
                      '(string-constant save-as-menu-item)
                      on-demand-do-nothing
                      #f)