# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 731397396 0
# Node ID 019308ed8918b1a590f2fa88c9465fce99768aa5
# Parent  9a765951a9b973cde7a2d3ab7a0b363551f1e765
(prefix-arg-internal): Use listify-key-sequence.

diff -r 9a765951a9b9 -r 019308ed8918 lisp/simple.el
--- a/lisp/simple.el	Sat Mar 06 05:56:08 1993 +0000
+++ b/lisp/simple.el	Sat Mar 06 05:56:36 1993 +0000
@@ -797,7 +797,7 @@
 	(progn
 	  (describe-arg value sign)
 	  (setq key (read-key-sequence nil t))))
-    (setq unread-command-events (append key '()))))
+    (setq unread-command-events (listify-key-sequence key))))
 
 (defun describe-arg (value sign)
   (cond ((numberp value)