execute-extended-command prompt fix (bug#13395)

* lisp/simple.el (execute-extended-command): Doc fix.
Bind prefix-arg around read-extended-command, for prompt.
This commit is contained in:
Glenn Morris 2013-01-09 16:23:14 -05:00
parent f55c06038d
commit 89c0dda852
2 changed files with 9 additions and 2 deletions

View file

@ -1,3 +1,8 @@
2013-01-09 Glenn Morris <rgm@gnu.org>
* simple.el (execute-extended-command): Doc fix.
Bind prefix-arg around read-extended-command, for prompt. (Bug#13395)
2013-01-09 Chong Yidong <cyd@gnu.org>
* faces.el (read-face-name): Doc fix.

View file

@ -1391,14 +1391,16 @@ If the value is non-nil and not a number, we wait 2 seconds."
;; Aaron S. Hawley <aaron.s.hawley(at)gmail.com> 2009-08-24
"Read function name, then read its arguments and call it.
To pass a numeric argument to the command you are invoking with, specify
To pass a numeric argument to the command you are invoking, specify
the numeric argument to this command.
Noninteractively, the argument PREFIXARG is the prefix argument to
give to the command you invoke, if it asks for an argument."
(interactive (list current-prefix-arg (read-extended-command)))
;; Emacs<24 calling-convention was with a single `prefixarg' argument.
(if (null command-name) (setq command-name (read-extended-command)))
(if (null command-name)
(setq command-name (let ((current-prefix-arg prefixarg)) ; for prompt
(read-extended-command))))
(let* ((function (and (stringp command-name) (intern-soft command-name)))
(binding (and suggest-key-bindings
(not executing-kbd-macro)