[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Better emoji support

From: Robert Pluim
Subject: Re: Better emoji support
Date: Fri, 17 Sep 2021 15:50:22 +0200

>>>>> On Fri, 17 Sep 2021 22:42:46 +0900, Jean-Christophe Helary 
>>>>> <lists@traduction-libre.org> said:

    Jean-Christophe> Robert,

    Jean-Christophe> Would you mind specifying what to test and how to test it ?

It should all Just Work™ :-)

>From admin/notes/unicode:

    Visit "emoji-data.txt" with the rebuilt Emacs, and check that an
    appropriate font is being used for the emoji (by default Emacs uses
    "Noto Color Emoji").  Running the following command in that buffer
    will give you an idea of which codepoints are not supported by
    whichever font Emacs is using.

    (defun check-emoji-coverage (font-name-regexp)
    "Display a buffer containing emoji codepoints for which FONT-NAME is not 
    This must be run from a buffer in the format of emoji-data.txt.
    FONT-NAME-REGEXP is checked using `string-match'."
    (interactive "MFont Name: ")
    (goto-char (point-min))
    (let (res char name ifont)
      (while (re-search-forward "; Emoji [^(]+(\\(.\\)[).\uFE0F]" nil t)
        (setq char (aref (match-string 1) 0))
        (setq ifont (car (internal-char-font nil char)))
        (when ifont
          (setq name (font-xlfd-name ifont)))
        (if (or (not ifont) (not (string-match font-name-regexp name)))
            (setq res (concat (string char) res))))
      (when res
        (with-output-to-temp-buffer "*Check-Emoji-Coverage*"
          (princ (format "Font not matching '%s' was used for the following 
                         font-name-regexp (reverse res))))))))


reply via email to

[Prev in Thread] Current Thread [Next in Thread]