changeset 51118:f80e017c6464

(ctl-x-map): Remove the C-x U binding added recently.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Wed, 21 May 2003 15:29:36 +0000
parents deff9a0011bc
children f4f7d408c37a
files lisp/simple.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/simple.el	Wed May 21 12:59:28 2003 +0000
+++ b/lisp/simple.el	Wed May 21 15:29:36 2003 +0000
@@ -1025,7 +1025,9 @@
 Contrary to `undo', this will not redo a previous undo."
   (interactive "*p")
   (let ((undo-no-redo t)) (undo arg)))
-(define-key ctl-x-map "U" 'undo-only)
+;; Richard said that we should not use C-x <uppercase letter> and I have
+;; no idea whereas to bind it.  Any suggestion welcome.  -stef
+;; (define-key ctl-x-map "U" 'undo-only)
 
 (defvar pending-undo-list nil
   "Within a run of consecutive undo commands, list remaining to be undone.")