From: Robert Pluim Date: Mon, 22 Nov 2021 16:42:03 +0000 (+0100) Subject: * admin/unidata/emoji-zwj.awk: Quote functions properly. X-Git-Tag: emacs-29.0.90~2852^2~71 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9fe409f958cc9d4ca43532dfd2343826677f5bae;p=emacs.git * admin/unidata/emoji-zwj.awk: Quote functions properly. --- diff --git a/admin/unidata/emoji-zwj.awk b/admin/unidata/emoji-zwj.awk index d4e2944ca34..e704cb45263 100644 --- a/admin/unidata/emoji-zwj.awk +++ b/admin/unidata/emoji-zwj.awk @@ -114,7 +114,7 @@ END { print " (nconc (char-table-range composition-function-table (car elt))" print " (list (vector (cdr elt)" print " 0" - print " 'compose-gstring-for-graphic)))))" + print " #'compose-gstring-for-graphic)))))" print ";; The following two blocks are derived by hand from emoji-sequences.txt" print ";; FIXME: add support for Emoji_Keycap_Sequence once we learn how to respect FE0F/VS-16" @@ -126,7 +126,7 @@ END { print " (nconc (char-table-range composition-function-table '(#x1F1E6 . #x1F1FF))" print " (list (vector \"[\\U0001F1E6-\\U0001F1FF][\\U0001F1E6-\\U0001F1FF]\"" print " 0" - print " 'compose-gstring-for-graphic))))" + print " #'compose-gstring-for-graphic))))" print ";; UK Flags" print "(set-char-table-range composition-function-table" @@ -134,7 +134,7 @@ END { print " (nconc (char-table-range composition-function-table #x1F3F4)" print " (list (vector \"\\U0001F3F4\\U000E0067\\U000E0062\\\\(?:\\U000E0065\\U000E006E\\U000E0067\\\\|\\U000E0073\\U000E0063\\U000E0074\\\\|\\U000E0077\\U000E006C\\U000E0073\\\\)\\U000E007F\"" print " 0" - print " 'compose-gstring-for-graphic))))" + print " #'compose-gstring-for-graphic))))" printf "\n(provide 'emoji-zwj)" }