changeset 13525:de50b50309d1

(universal-argument-other-key): Add to existing unread-command-events value.
author Richard M. Stallman <rms@gnu.org>
date Sat, 11 Nov 1995 23:56:47 +0000
parents 0d24a33d8bba
children 34382f4e23cb
files lisp/simple.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/simple.el	Sat Nov 11 23:56:03 1995 +0000
+++ b/lisp/simple.el	Sat Nov 11 23:56:47 1995 +0000
@@ -1016,7 +1016,8 @@
   (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))