aboutsummaryrefslogtreecommitdiffstats
path: root/admin
diff options
context:
space:
mode:
authorRobert Pluim2021-11-22 17:42:03 +0100
committerRobert Pluim2021-11-24 14:09:59 +0100
commit9fe409f958cc9d4ca43532dfd2343826677f5bae (patch)
tree4e3da2ca5c2f823a2ac7277c2d2dedd275450b4e /admin
parentfc35928ec2b3be40ff7323515f948fc82ca487ca (diff)
downloademacs-9fe409f958cc9d4ca43532dfd2343826677f5bae.tar.gz
emacs-9fe409f958cc9d4ca43532dfd2343826677f5bae.zip
* admin/unidata/emoji-zwj.awk: Quote functions properly.
Diffstat (limited to 'admin')
-rw-r--r--admin/unidata/emoji-zwj.awk6
1 files changed, 3 insertions, 3 deletions
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 {
114 print " (nconc (char-table-range composition-function-table (car elt))" 114 print " (nconc (char-table-range composition-function-table (car elt))"
115 print " (list (vector (cdr elt)" 115 print " (list (vector (cdr elt)"
116 print " 0" 116 print " 0"
117 print " 'compose-gstring-for-graphic)))))" 117 print " #'compose-gstring-for-graphic)))))"
118 118
119 print ";; The following two blocks are derived by hand from emoji-sequences.txt" 119 print ";; The following two blocks are derived by hand from emoji-sequences.txt"
120 print ";; FIXME: add support for Emoji_Keycap_Sequence once we learn how to respect FE0F/VS-16" 120 print ";; FIXME: add support for Emoji_Keycap_Sequence once we learn how to respect FE0F/VS-16"
@@ -126,7 +126,7 @@ END {
126 print " (nconc (char-table-range composition-function-table '(#x1F1E6 . #x1F1FF))" 126 print " (nconc (char-table-range composition-function-table '(#x1F1E6 . #x1F1FF))"
127 print " (list (vector \"[\\U0001F1E6-\\U0001F1FF][\\U0001F1E6-\\U0001F1FF]\"" 127 print " (list (vector \"[\\U0001F1E6-\\U0001F1FF][\\U0001F1E6-\\U0001F1FF]\""
128 print " 0" 128 print " 0"
129 print " 'compose-gstring-for-graphic))))" 129 print " #'compose-gstring-for-graphic))))"
130 130
131 print ";; UK Flags" 131 print ";; UK Flags"
132 print "(set-char-table-range composition-function-table" 132 print "(set-char-table-range composition-function-table"
@@ -134,7 +134,7 @@ END {
134 print " (nconc (char-table-range composition-function-table #x1F3F4)" 134 print " (nconc (char-table-range composition-function-table #x1F3F4)"
135 print " (list (vector \"\\U0001F3F4\\U000E0067\\U000E0062\\\\(?:\\U000E0065\\U000E006E\\U000E0067\\\\|\\U000E0073\\U000E0063\\U000E0074\\\\|\\U000E0077\\U000E006C\\U000E0073\\\\)\\U000E007F\"" 135 print " (list (vector \"\\U0001F3F4\\U000E0067\\U000E0062\\\\(?:\\U000E0065\\U000E006E\\U000E0067\\\\|\\U000E0073\\U000E0063\\U000E0074\\\\|\\U000E0077\\U000E006C\\U000E0073\\\\)\\U000E007F\""
136 print " 0" 136 print " 0"
137 print " 'compose-gstring-for-graphic))))" 137 print " #'compose-gstring-for-graphic))))"
138 138
139 printf "\n(provide 'emoji-zwj)" 139 printf "\n(provide 'emoji-zwj)"
140} 140}