changeset 11747:afc9c0b4fbb5

entered into RCS
author Richard M. Stallman <rms@gnu.org>
date Sun, 07 May 1995 23:02:13 +0000
parents e93b5c05c949
children f09f5b29f524
files lisp/emulation/pc-mode.el
diffstat 1 files changed, 6 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emulation/pc-mode.el	Sun May 07 22:36:27 1995 +0000
+++ b/lisp/emulation/pc-mode.el	Sun May 07 23:02:13 1995 +0000
@@ -2,13 +2,18 @@
   "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."
 
   (interactive)
   (define-key function-key-map [delete] "\C-d")
-  (define-key function-key-map [M-delete] [?\M-\C-d])
+  (define-key function-key-map [M-delete] [?\M-d])
+  (define-key function-key-map [C-delete] [?\M-d])
   (global-set-key [C-M-delete] 'kill-sexp)
+  (global-set-key [C-backspace] 'backward-kill-word)
+  (global-set-key [M-backspace] 'undo)
 
   (global-set-key [home] 'beginning-of-line)
   (global-set-key [end] 'end-of-line)