From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 11 Nov 1995 23:56:47 +0000 (+0000)
Subject: (universal-argument-other-key): Add to existing unread-command-events value.
X-Git-Tag: emacs-19.34~2335
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=06697cdba8752cca53b2886e7f3f62fcb991f65d;p=emacs.git

(universal-argument-other-key): Add to existing unread-command-events value.
---

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))