branch: master
commit d74fab4a5b98910bd09956d3cb9b3376d6287840
Author: Oleh Krehel <ohwoeo...@gmail.com>
Commit: Oleh Krehel <ohwoeo...@gmail.com>

    counsel.el (counsel-M-x): Let-bind this-command
    
    This change allows in particular to customize `ivy-re-builders-alist'
    via `this-command' and have `counsel-M-x' work properly with it.
---
 counsel.el |    3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/counsel.el b/counsel.el
index 88b1441..7df6c87 100644
--- a/counsel.el
+++ b/counsel.el
@@ -892,7 +892,8 @@ Optional INITIAL-INPUT is the initial input in the 
minibuffer."
                 (when (featurep 'smex)
                   (smex-rank (intern cmd)))
                 (let ((prefix-arg current-prefix-arg)
-                      (ivy-format-function store))
+                      (ivy-format-function store)
+                      (this-command (intern cmd)))
                   (command-execute (intern cmd) 'record)))
               :sort sort
               :keymap counsel-describe-map

Reply via email to