Make emoji-describe really describe only the glyph under point

* lisp/international/emoji.el (emoji-describe): Only look at the
compositions under point (bug#51659).
This commit is contained in:
Lars Ingebrigtsen 2021-11-07 16:04:18 +01:00
parent 93ee666c09
commit 3886c95d7e

View file

@ -120,7 +120,7 @@ character) under point is."
(interactive
(list (if (eobp)
(error "No glyph under point")
(let ((comp (find-composition (point))))
(let ((comp (find-composition (point) (1+ (point)))))
(if comp
(buffer-substring-no-properties (car comp) (cadr comp))
(buffer-substring-no-properties (point) (1+ (point))))))