[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 7be7359 1/2: Hide transient prefix/suffix commands from execute-e
From: |
Jonas Bernoulli |
Subject: |
master 7be7359 1/2: Hide transient prefix/suffix commands from execute-extended-command |
Date: |
Wed, 22 Dec 2021 14:05:15 -0500 (EST) |
branch: master
commit 7be73593b4b7d65342263d3bac2558aa27dfb175
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>
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.
---
lisp/international/emoji.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/lisp/international/emoji.el b/lisp/international/emoji.el
index cd6684c..cab524e 100644
--- a/lisp/international/emoji.el
+++ b/lisp/international/emoji.el
@@ -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))))