* lisp/simple.el (command-execute): Respect nil disabled-command-function.
This commit is contained in:
parent
6116a72722
commit
c7510f6e94
2 changed files with 6 additions and 1 deletions
|
@ -1,3 +1,7 @@
|
|||
2014-04-02 Glenn Morris <rgm@gnu.org>
|
||||
|
||||
* simple.el (command-execute): Respect nil disabled-command-function.
|
||||
|
||||
2014-04-01 Nicolas Richard <theonewiththeevillook@yahoo.fr>
|
||||
|
||||
* simple.el (command-execute): Do not execute the command when it
|
||||
|
|
|
@ -1629,7 +1629,8 @@ a special event, so ignore the prefix argument and don't clear it."
|
|||
(setq current-prefix-arg prefix-arg)
|
||||
(setq prefix-arg nil)))))
|
||||
(if (and (symbolp cmd)
|
||||
(get cmd 'disabled))
|
||||
(get cmd 'disabled)
|
||||
disabled-command-function)
|
||||
;; FIXME: Weird calling convention!
|
||||
(run-hooks 'disabled-command-function)
|
||||
(let ((final cmd))
|
||||
|
|
Loading…
Add table
Reference in a new issue