diff --git a/collects/drracket/private/main.rkt b/collects/drracket/private/main.rkt index c9275e7190..7cf944ceef 100644 --- a/collects/drracket/private/main.rkt +++ b/collects/drracket/private/main.rkt @@ -84,7 +84,7 @@ ll)))) (drr:set-default 'drracket:module-language-first-line-special? #t boolean?) -(drr:set-default 'drracket:use-old-style-keybindings #f boolean?) + (drr:set-default 'drracket:defns-popup-sort-by-name? #f boolean?) (drr:set-default 'drracket:show-line-numbers? #f boolean?) @@ -297,10 +297,6 @@ (make-check-box 'drracket:module-language-first-line-special? (string-constant ml-always-show-#lang-line) - editor-panel) - - (make-check-box 'drracket:use-old-style-keybindings - (string-constant old-style-keybindings) editor-panel))) (preferences:add-to-editor-checkbox-panel diff --git a/collects/drracket/private/unit.rkt b/collects/drracket/private/unit.rkt index 0c5651583e..30833abb8b 100644 --- a/collects/drracket/private/unit.rkt +++ b/collects/drracket/private/unit.rkt @@ -3380,7 +3380,7 @@ module browser threading seems wrong. (set! file-menu:create-new-tab-item (new menu:can-restore-menu-item% (label (string-constant new-tab)) - (shortcut (if (preferences:get 'drracket:use-old-style-keybindings) #\= #\t)) + (shortcut #\t) (parent file-menu) (callback (λ (x y) @@ -3459,13 +3459,8 @@ module browser threading seems wrong. (preferences:get 'framework:print-output-mode))))) (super file-menu:between-print-and-close file-menu)) - (inherit edit-menu:get-replace-item) (define/override (edit-menu:between-find-and-preferences edit-menu) (super edit-menu:between-find-and-preferences edit-menu) - (when (preferences:get 'drracket:use-old-style-keybindings) - (define item (edit-menu:get-replace-item)) - (send item set-shortcut #\r) - (send item set-shortcut-prefix (get-default-shortcut-prefix))) (new menu:can-restore-menu-item% [label (string-constant complete-word)] [shortcut #\/] @@ -3676,7 +3671,7 @@ module browser threading seems wrong. (string-constant execute-menu-item-label) language-specific-menu (λ (_1 _2) (execute-callback)) - (if (preferences:get 'drracket:use-old-style-keybindings) #\t #\r) + #\r (string-constant execute-menu-item-help-string))) (make-object menu:can-restore-menu-item% (string-constant ask-quit-menu-item-label) diff --git a/collects/string-constants/private/english-string-constants.rkt b/collects/string-constants/private/english-string-constants.rkt index 97039da41a..cf696f7c58 100644 --- a/collects/string-constants/private/english-string-constants.rkt +++ b/collects/string-constants/private/english-string-constants.rkt @@ -492,7 +492,6 @@ please adhere to these guidelines: (show-interactions-on-execute "Automatically open interactions window when running a program") (switch-to-module-language-automatically "Automatically switch to the module language when opening a module") (interactions-beside-definitions "Put the interactions window beside the definitions window") ;; in preferences, below the checkbox one line above this one - (old-style-keybindings "Old-style keybindings (Run: -t; New-tab: -=; Replace: -r)") (show-line-numbers "Show line numbers") (show-line-numbers/menu "Show Line &Numbers") ;; just like the above, but capitalized for appearance in a menu item (hide-line-numbers/menu "Hide Line &Numbers") @@ -1399,7 +1398,7 @@ please adhere to these guidelines: ;; title of this section of the dialog (possibly the word ;; `Collection' should not be translated) (ml-cp-collection-paths "Collection Paths") - + ;; button labels (ml-cp-add "Add") (ml-cp-add-default "Add Default") diff --git a/collects/string-constants/private/german-string-constants.rkt b/collects/string-constants/private/german-string-constants.rkt index 3889fa6273..5d08555427 100644 --- a/collects/string-constants/private/german-string-constants.rkt +++ b/collects/string-constants/private/german-string-constants.rkt @@ -389,7 +389,6 @@ (open-files-in-tabs "Dateien in separaten Tabs öffnen (nicht separaten Fenstern)") (show-interactions-on-execute "Interaktionen beim Programmstart automatisch öffnen") (switch-to-module-language-automatically "Automatisch in die `module'-Sprache wechseln, wenn ein Modul geöffnet wird") - (old-style-keybindings "Historische Tastaturbelegungkeybindings (Start: -t; Neuer Tab: -=; Ersetzen: -r)") (interactions-beside-definitions "Interaktionen neben den Definitionen anzeigen") ;; in preferences, below the checkbox one line above this one (show-line-numbers "Zeilennummern einblenden") (show-line-numbers/menu "Zeilen&nummern einblenden") diff --git a/doc/release-notes/drracket/HISTORY.txt b/doc/release-notes/drracket/HISTORY.txt index 59ba90b665..6312b95b24 100644 --- a/doc/release-notes/drracket/HISTORY.txt +++ b/doc/release-notes/drracket/HISTORY.txt @@ -2,13 +2,14 @@ Version 5.2 ------------------------------ - . changed a three menu keybidings: + . changed three menu keybidings: "New Tab" is now -t "Run" is now -r "Replace" is now -shift-f - The preferences dialog (general tab) has a checkbox to - restore the old behavior. + The Keyboard Shortcuts section in the manual has a sample + keybindings file a checkbox that restores the old behavior of + the first two. . Under Windows, DrRacket now saves files, in some situations, with LF terminators. Previously, under windows, all files @@ -26,7 +27,7 @@ . removed the "open here" functionality (both from the DrRacket app and from the framework library) - . 2htdp/image: + . 2htdp/image: - shrunk the size of saved files that contain 2htdp/image bitmaps (you can get these by copying and pasting from the REPL; using "insert image" isn't affected)