Mercurial > emacs
changeset 11748:f09f5b29f524
Add C-escape binding.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sun, 07 May 1995 23:08:17 +0000 |
| parents | afc9c0b4fbb5 |
| children | 8da04214faed |
| files | lisp/emulation/pc-mode.el |
| diffstat | 1 files changed, 8 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emulation/pc-mode.el Sun May 07 23:02:13 1995 +0000 +++ b/lisp/emulation/pc-mode.el Sun May 07 23:08:17 1995 +0000 @@ -1,11 +1,12 @@ (defun pc-bindings-mode () "Set up certain key bindings for PC compatibility. The keys affected are: - DELETE (and its variants) delete forward instead of backward. - C-BACKSPACE kills backward a word (as C-DELETE normally would). - M-BACKSPACE does undo. - HOME and END move to beginning and end of line - C-HOME and C-END move to beginning and end of buffer." +Delete (and its variants) delete forward instead of backward. +C-Backspace kills backward a word (as C-Delete normally would). +M-Backspace does undo. +Home and End move to beginning and end of line +C-Home and C-End move to beginning and end of buffer. +C-Escape does list-buffers." (interactive) (define-key function-key-map [delete] "\C-d") @@ -15,6 +16,8 @@ (global-set-key [C-backspace] 'backward-kill-word) (global-set-key [M-backspace] 'undo) + (global-set-key [C-escape] 'list-buffers) + (global-set-key [home] 'beginning-of-line) (global-set-key [end] 'end-of-line) (global-set-key [C-home] 'beginning-of-buffer)