Hide transient prefix/suffix commands from execute-extended-command

* lisp/international/emoji.el (emoji--define-transient): Hide
transient prefix/suffix commands from 'execute-extended-command'
by declaring that they should only be listed in the non-existent
'not-a-mode' mode.
This commit is contained in:
Jonas Bernoulli 2021-12-22 20:02:00 +01:00
parent 8d0efd87e1
commit 7be73593b4

View file

@ -535,7 +535,7 @@ the name is not known."
t end-function))
;; Insert the emoji.
(lambda ()
(interactive)
(interactive nil not-a-mode)
;; Allow switching to the correct
;; buffer.
(when end-function
@ -548,7 +548,7 @@ the name is not known."
;; There's probably a better way to do this...
(setf (symbol-function name)
(lambda ()
(interactive)
(interactive nil not-a-mode)
(transient-setup name)))
(pcase-let ((`(,class ,slots ,suffixes ,docstr ,_body)
(transient--expand-define-args (list args))))