# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 799888097 0
# Node ID f09f5b29f52414a6c1456c210abcb92c86c52fdb
# Parent  afc9c0b4fbb519c9196a4e5d2a4d7e32f81dac6d
Add C-escape binding.

diff -r afc9c0b4fbb5 -r f09f5b29f524 lisp/emulation/pc-mode.el
--- 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)