mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-12-24 10:38:38 +00:00
Update some tutorial key bindings; ref bug#8739.
* lisp/tutorial.el (tutorial--default-keys): Update some default bindings. * etc/NEWS: delete-forward-char is not bound to C-d. * lisp/bindings.el, lisp/windows.el: Comments.
This commit is contained in:
parent
8e999f70ab
commit
59ee05427d
2
etc/NEWS
2
etc/NEWS
@ -407,7 +407,7 @@ If non-nil, C-d, [delete], and DEL delete the region if it is active
|
||||
and no prefix argument is given. If set to `kill', these commands
|
||||
kill instead.
|
||||
|
||||
*** New command `delete-forward-char', bound to C-d and [delete].
|
||||
*** New command `delete-forward-char', bound to [delete].
|
||||
This is meant for interactive use, and obeys `delete-active-region'.
|
||||
The command `delete-char' does not obey `delete-active-region'.
|
||||
|
||||
|
@ -1,5 +1,7 @@
|
||||
2011-08-20 Glenn Morris <rgm@gnu.org>
|
||||
|
||||
* tutorial.el (tutorial--default-keys): Update some default bindings.
|
||||
|
||||
* files.el (hack-local-variables): Fully ignore case for "mode:".
|
||||
|
||||
2011-08-20 Alan Mackenzie <acm@muc.de>
|
||||
|
@ -834,6 +834,7 @@ if `inhibit-field-text-motion' is non-nil."
|
||||
(setq i (1+ i))))
|
||||
(define-key global-map [?\C-\M--] 'negative-argument)
|
||||
|
||||
;; Update tutorial--default-keys if you change these.
|
||||
(define-key global-map "\177" 'delete-backward-char)
|
||||
(define-key global-map "\C-d" 'delete-char)
|
||||
|
||||
|
@ -253,7 +253,7 @@ LEFT and RIGHT are the elements to compare."
|
||||
;; * INSERTING AND DELETING
|
||||
;; C-u 8 * to insert ********.
|
||||
(delete-backward-char "\d")
|
||||
(delete-forward-char [?\C-d])
|
||||
(delete-char [?\C-d])
|
||||
(backward-kill-word [?\M-\d])
|
||||
(kill-word [?\M-d])
|
||||
(kill-line [?\C-k])
|
||||
@ -298,7 +298,7 @@ LEFT and RIGHT are the elements to compare."
|
||||
(isearch-backward [?\C-r])
|
||||
|
||||
;; * MULTIPLE WINDOWS
|
||||
(split-window-vertically [?\C-x ?2])
|
||||
(split-window-above-each-other [?\C-x ?2])
|
||||
(scroll-other-window [?\C-\M-v])
|
||||
(other-window [?\C-x ?o])
|
||||
(find-file-other-window [?\C-x ?4 ?\C-f])
|
||||
|
@ -7474,6 +7474,8 @@ Otherwise, consult the value of `truncate-partial-width-windows'
|
||||
(< (window-width window) t-p-w-w)
|
||||
t-p-w-w))))
|
||||
|
||||
;; Some of these are in tutorial--default-keys, so update that if you
|
||||
;; change these.
|
||||
(define-key ctl-x-map "0" 'delete-window)
|
||||
(define-key ctl-x-map "1" 'delete-other-windows)
|
||||
(define-key ctl-x-map "2" 'split-window-above-each-other)
|
||||
|
Loading…
Reference in New Issue
Block a user