From 06697cdba8752cca53b2886e7f3f62fcb991f65d Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sat, 11 Nov 1995 23:56:47 +0000 Subject: [PATCH] (universal-argument-other-key): Add to existing unread-command-events value. --- lisp/simple.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/simple.el b/lisp/simple.el index 51af9d364fe..9d34a467d96 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)) -- 2.39.2