branch: master
commit 017e007c8a736b8d7d07f074e2dd695e47e511ee
Author: Oleh Krehel <[email protected]>
Commit: Oleh Krehel <[email protected]>
counsel.el (counsel-M-x): Avoid compilation warning
* counsel.el (counsel-M-x): Use `command-execute' instead of
`execute-extended-command'.
---
counsel.el | 3 ++-
1 files changed, 2 insertions(+), 1 deletions(-)
diff --git a/counsel.el b/counsel.el
index 3f82275..0ae079f 100644
--- a/counsel.el
+++ b/counsel.el
@@ -536,7 +536,8 @@ Optional INITIAL-INPUT is the initial input in the
minibuffer."
(lambda (cmd)
(when (featurep 'smex)
(smex-rank (intern cmd)))
- (execute-extended-command current-prefix-arg cmd))
+ (let ((prefix-arg current-prefix-arg))
+ (command-execute (intern cmd) 'record)))
:sort sort
:keymap counsel-describe-map
:initial-input initial-input)))
