diff options
| author | Thierry Volpiatto <thierry.volpiatto@gmail.com> | 2016-06-24 06:02:18 +0200 |
|---|---|---|
| committer | Thierry Volpiatto <thierry.volpiatto@gmail.com> | 2016-06-24 06:02:18 +0200 |
| commit | 3071e55cd9fad774a0ffe48640c3e4b45eca86f9 (patch) | |
| tree | 4b0696dccb87210b29581e2d997f4188ddf24c04 /helm-command.el | |
| parent | 7669b396153b4ee4638903648f6a5fa22ddb2ece (diff) | |
Shutup byte compiler in helm-M-x.
* helm-command.el (helm-M-x): Fix also interactive-only not
supported in declare in <emacs-25.
Diffstat (limited to 'helm-command.el')
| -rw-r--r-- | helm-command.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/helm-command.el b/helm-command.el index a2bdaf8b..8e0d606a 100644 --- a/helm-command.el +++ b/helm-command.el @@ -247,7 +247,7 @@ than the default which is OBARRAY." (setq helm--mode-line-display-prefarg nil))))) ;;;###autoload -(defun helm-M-x (arg &optional command-name) +(defun helm-M-x (_arg &optional command-name) "Preconfigured `helm' for Emacs commands. It is `helm' replacement of regular `M-x' `execute-extended-command'. @@ -255,7 +255,6 @@ Unlike regular `M-x' emacs vanilla `execute-extended-command' command, the prefix args if needed, are passed AFTER starting `helm-M-x'. You can get help on each command by persistent action." - (declare (interactive-only command-execute)) (interactive (progn (setq helm-M-x-prefix-argument current-prefix-arg) @@ -277,7 +276,7 @@ You can get help on each command by persistent action." (delete command-name extended-command-history))) (when helm-M-x-always-save-history (command-execute sym-com 'record)))))) - +(put 'helm-M-x 'interactive-only 'command-execute) (provide 'helm-command) |