diff options
author | Robert Pluim <rpluim@gmail.com> | 2021-09-19 21:07:36 +0200 |
---|---|---|
committer | Robert Pluim <rpluim@gmail.com> | 2021-09-20 19:10:30 +0200 |
commit | bcfc570bac07344cf4409d95972b504bcbc26d24 (patch) | |
tree | 1b823c09170c8728d3194a524ba2e2a6ea5c608f /admin/notes | |
parent | ab676214bd64e04723cf6e451e353c81c2346789 (diff) | |
download | emacs-bcfc570bac07344cf4409d95972b504bcbc26d24.tar.gz |
Base emoji script membership on Emoji_Presentation
The Emoji property describes which codepoints can be displayed as
emoji, but Emoji_Presentation governs which are displayed as emoji by
default.
* admin/notes/unicode: Adjust check-emoji-coverage to look in the
Emoji_Presentation sections of emoji-data.txt
* admin/unidata/blocks.awk: Assign emoji script using the
Emoji_Presentation section.
Diffstat (limited to 'admin/notes')
-rw-r--r-- | admin/notes/unicode | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/admin/notes/unicode b/admin/notes/unicode index 9dc6f3bdca3..0b2ce527948 100644 --- a/admin/notes/unicode +++ b/admin/notes/unicode @@ -100,7 +100,7 @@ FONT-NAME-REGEXP is checked using `string-match'." (save-excursion (goto-char (point-min)) (let (res char name ifont) - (while (re-search-forward "; Emoji [^(]+(\\(.\\)[).\uFE0F]" nil t) + (while (re-search-forward "; Emoji_Presentation [^(]+(\\(.\\)[).]" nil t) (setq char (aref (match-string 1) 0)) (setq ifont (car (internal-char-font nil char))) (when ifont |