; Always set 'emoji--insert-buffer'

* lisp/international/emoji.el (emoji-list): Always set insert buffer.
(Bug#73390)

Copyright-paperwork-exempt: yes
(cherry picked from commit ecfebb5abb864d568a90ff4a1420c973781bbef9)

diff --git a/lisp/international/emoji.el b/lisp/international/emoji.el
index bd07c12778aa60f5bbda93452e4e229e1ccb0c95..7992eb699f2d9aa935ecb49dc4d013ada4bb1cef 100644 (file)
--- a/lisp/international/emoji.el
+++ b/lisp/international/emoji.el
@@ -164,12 +164,12 @@ when the command was invoked."
   (let ((buf (current-buffer)))
     (emoji--init)
     (switch-to-buffer (get-buffer-create "*Emoji*"))
+    (setq-local emoji--insert-buffer buf)
     ;; Don't regenerate the buffer if it already exists -- this will
     ;; leave point where it was the last time it was used.
     (when (zerop (buffer-size))
       (let ((inhibit-read-only t))
         (emoji-list-mode)
-        (setq-local emoji--insert-buffer buf)
         (emoji--list-generate nil (cons nil emoji--labels))
         (goto-char (point-min))))))