diff options
Diffstat (limited to 'lisp/emulation')
| -rw-r--r-- | lisp/emulation/cua-base.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/emulation/cua-base.el b/lisp/emulation/cua-base.el index 43e0956ea83..302ef123865 100644 --- a/lisp/emulation/cua-base.el +++ b/lisp/emulation/cua-base.el | |||
| @@ -710,7 +710,8 @@ a cons (TYPE . COLOR), then both properties are affected." | |||
| 710 | ;; C-x binding after the first C-x C-x was rewritten to just C-x). | 710 | ;; C-x binding after the first C-x C-x was rewritten to just C-x). |
| 711 | (prefix-command-preserve-state) | 711 | (prefix-command-preserve-state) |
| 712 | ;; Push the key back on the event queue | 712 | ;; Push the key back on the event queue |
| 713 | (setq unread-command-events (cons key unread-command-events)))) | 713 | (setq unread-command-events (cons (cons 'no-record key) |
| 714 | unread-command-events)))) | ||
| 714 | 715 | ||
| 715 | (defun cua--prefix-override-handler () | 716 | (defun cua--prefix-override-handler () |
| 716 | "Start timer waiting for prefix key to be followed by another key. | 717 | "Start timer waiting for prefix key to be followed by another key. |