From: Mattias EngdegÄrd Date: Wed, 15 Feb 2023 11:21:44 +0000 (+0100) Subject: ; * lisp/international/emoji.el (emoji--narrow): move, avoid warning X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b9ef710dd3b46bdfe7a0352873a0f2be5b9e4ce4;p=emacs.git ; * lisp/international/emoji.el (emoji--narrow): move, avoid warning --- 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." (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)