procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Add C-escape binding.

Browse source
This commit is contained in:
Richard M. Stallman 1995-05-07 23:08:17 +00:00
parent b6384070e8
commit 002c4306f0
1 changed files with 8 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

13
lisp/emulation/pc-mode.el
View file

@ -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 @@ The keys affected are:
(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)