aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorMattias EngdegÄrd2023-02-15 12:21:44 +0100
committerMattias EngdegÄrd2023-02-15 12:21:44 +0100
commitb9ef710dd3b46bdfe7a0352873a0f2be5b9e4ce4 (patch)
treec8872ff999451067cf74b35255ab6bae2f094be7
parent16ba96ad3ddbd5607a2e40ffe5abfe53c3e6a1c5 (diff)
downloademacs-b9ef710dd3b46bdfe7a0352873a0f2be5b9e4ce4.tar.gz
emacs-b9ef710dd3b46bdfe7a0352873a0f2be5b9e4ce4.zip
; * lisp/international/emoji.el (emoji--narrow): move, avoid warning
-rw-r--r--lisp/international/emoji.el10
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/international/emoji.el b/lisp/international/emoji.el
index b920582fee0..fec3e637f0c 100644
--- a/lisp/international/emoji.el
+++ b/lisp/international/emoji.el
@@ -116,6 +116,11 @@ and also consults the `emoji-alternate-names' alist."
116 (emoji--add-recent glyph) 116 (emoji--add-recent glyph)
117 (insert glyph)))) 117 (insert glyph))))
118 118
119(defclass emoji--narrow (transient-suffix)
120 ((title :initarg :title)
121 (done-derived :initarg :done-derived)
122 (children :initarg :children)))
123
119(defun emoji--setup-prefix (command title done-derived spec) 124(defun emoji--setup-prefix (command title done-derived spec)
120 (transient-setup 125 (transient-setup
121 command nil nil 126 command nil nil
@@ -137,11 +142,6 @@ and also consults the `emoji-alternate-names' alist."
137(defun emoji--group-description () 142(defun emoji--group-description ()
138 (car (oref transient--prefix scope))) 143 (car (oref transient--prefix scope)))
139 144
140(defclass emoji--narrow (transient-suffix)
141 ((title :initarg :title)
142 (done-derived :initarg :done-derived)
143 (children :initarg :children)))
144
145(transient-define-suffix emoji-insert-glyph () 145(transient-define-suffix emoji-insert-glyph ()
146 "Insert the emoji you selected." 146 "Insert the emoji you selected."
147 (interactive nil not-a-mode) 147 (interactive nil not-a-mode)