Remove preference for old-style menu bindings, and instead add a sample

keybindings file that does that.

(This reverts most of commit 26f6c588fcfa45a1a12c275e5824aede8ba23e3e.)
This commit is contained in:
Eli Barzilay 2011-10-17 14:09:26 -04:00
parent 016e6d771c
commit c66c669ee3
5 changed files with 9 additions and 19 deletions

View File

@ -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

View File

@ -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)

View File

@ -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: <menukey>-t; New-tab: <menukey>-=; Replace: <menukey>-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")

View File

@ -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: <menukey>-t; Neuer Tab: <menukey>-=; Ersetzen: <menukey>-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")

View File

@ -2,13 +2,14 @@
Version 5.2
------------------------------
. changed a three menu keybidings:
. changed three menu keybidings:
"New Tab" is now <menukey>-t
"Run" is now <menukey>-r
"Replace" is now <menukey>-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