diff options
| author | Richard M. Stallman <[email protected]> | 1995-11-11 23:56:47 +0000 |
|---|---|---|
| committer | Richard M. Stallman <[email protected]> | 1995-11-11 23:56:47 +0000 |
| commit | 06697cdba8752cca53b2886e7f3f62fcb991f65d (patch) | |
| tree | faab62c3675c09b4b80535a8eb6ec86639d6e7af /lisp | |
| parent | 7a79b90c1acb60b1d0cfef5d1781ba4e3d100b61 (diff) | |
(universal-argument-other-key): Add to existing unread-command-events value.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/simple.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index 51af9d364f..9d34a467d9 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -1016,7 +1016,8 @@ Repeating \\[universal-argument] without digits or minus sign (let* ((key (this-command-keys)) (keylist (listify-key-sequence key))) (setq unread-command-events - (nthcdr universal-argument-num-events keylist))) + (append (nthcdr universal-argument-num-events keylist) + unread-command-events))) (reset-this-command-lengths) (setq overriding-terminal-local-map nil)) |