mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2026-09-10 15:56:35 -04:00
; Fix trivial mistake in emoji--choose-emoji
* lisp/international/emoji.el (emoji--choose-emoji): The derived versions are in the cdr not cadr.
This commit is contained in:
parent
d7b4a8487f
commit
929daafa1d
|
|
@ -685,7 +685,7 @@ We prefer the earliest unique letter."
|
|||
(cons glyph (gethash glyph emoji--derived))))))
|
||||
|
||||
(defun emoji--choose-emoji ()
|
||||
(pcase-let ((`(,glyph ,derived) (emoji--read-emoji)))
|
||||
(pcase-let ((`(,glyph . ,derived) (emoji--read-emoji)))
|
||||
(if (not derived)
|
||||
;; Simple glyph with no derivations.
|
||||
(progn
|
||||
|
|
|
|||
Loading…
Reference in a new issue