procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

; * lisp/international/emoji.el (emoji--narrow): move, avoid warning

Browse source
This commit is contained in:
Mattias Engdegård 2023-02-15 12:21:44 +01:00
parent 16ba96ad3d
commit b9ef710dd3
1 changed files with 5 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
lisp/international/emoji.el
View file

@ -116,6 +116,11 @@ and also consults the `emoji-alternate-names' alist."
(emoji--add-recent glyph)
(insert glyph))))
(defclass emoji--narrow (transient-suffix)
((title :initarg :title)
(done-derived :initarg :done-derived)
(children :initarg :children)))
(defun emoji--setup-prefix (command title done-derived spec)
(transient-setup
command nil nil
@ -137,11 +142,6 @@ and also consults the `emoji-alternate-names' alist."
(defun emoji--group-description ()
(car (oref transient--prefix scope)))
(defclass emoji--narrow (transient-suffix)
((title :initarg :title)
(done-derived :initarg :done-derived)
(children :initarg :children)))
(transient-define-suffix emoji-insert-glyph ()
"Insert the emoji you selected."
(interactive nil not-a-mode)