diff options
| author | Richard M. Stallman | 1993-03-06 05:56:36 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1993-03-06 05:56:36 +0000 |
| commit | d70202c082d9f2f561eb4f340b94105e855f6ff9 (patch) | |
| tree | 1a998c727f506bbdb67c1a05d9f62f8a8f2a1b10 | |
| parent | bdc2ae8d60d0b74ee0f1989e5719e207fd7679aa (diff) | |
| download | emacs-d70202c082d9f2f561eb4f340b94105e855f6ff9.tar.gz emacs-d70202c082d9f2f561eb4f340b94105e855f6ff9.zip | |
(prefix-arg-internal): Use listify-key-sequence.
| -rw-r--r-- | lisp/simple.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index 4276478f844..b2bb0c0b37c 100644 --- a/lisp/simple.el +++ b/lisp/simple.el | |||
| @@ -797,7 +797,7 @@ Repeating \\[universal-argument] without digits or minus sign | |||
| 797 | (progn | 797 | (progn |
| 798 | (describe-arg value sign) | 798 | (describe-arg value sign) |
| 799 | (setq key (read-key-sequence nil t)))) | 799 | (setq key (read-key-sequence nil t)))) |
| 800 | (setq unread-command-events (append key '())))) | 800 | (setq unread-command-events (listify-key-sequence key)))) |
| 801 | 801 | ||
| 802 | (defun describe-arg (value sign) | 802 | (defun describe-arg (value sign) |
| 803 | (cond ((numberp value) | 803 | (cond ((numberp value) |