branch: externals/transient
commit 8d8ed1965f024ac35de6c54c5baf6bd4d2b709f9
Author: Jonas Bernoulli <[email protected]>
Commit: Jonas Bernoulli <[email protected]>
Hide infix commands from execute-extended-command
To benefit from this users have to:
(setq read-extended-command-predicate
'command-completion-default-include-p)
---
lisp/transient.el | 1 +
1 file changed, 1 insertion(+)
diff --git a/lisp/transient.el b/lisp/transient.el
index a349046fc8..32e4f38b76 100644
--- a/lisp/transient.el
+++ b/lisp/transient.el
@@ -962,6 +962,7 @@ keyword.
`(progn
(defalias ',name ,(transient--default-infix-command))
(put ',name 'interactive-only t)
+ (put ',name 'command-modes (list 'not-a-mode))
(put ',name 'function-documentation ,docstr)
(put ',name 'transient--suffix
(,(or class 'transient-switch) :command ',name ,@slots)))))
