Mercurial > emacs
comparison lisp/international/characters.el @ 93517:3d721e1337dd
(script-list): Add phonetic script, covering IPA (previously Latin),
Phonetic Extensions and Phonetic Extensions Supplement (both previously
unassigned).
author | Jason Rumney <jasonr@gnu.org> |
---|---|
date | Tue, 01 Apr 2008 14:19:42 +0000 |
parents | cbc008b3464f |
children | f8353eba8b8d |
comparison
equal
deleted
inserted
replaced
93516:664f1bc28031 | 93517:3d721e1337dd |
---|---|
1038 ;; undefined codepoints. | 1038 ;; undefined codepoints. |
1039 (let ((script-list nil)) | 1039 (let ((script-list nil)) |
1040 (dolist | 1040 (dolist |
1041 (elt | 1041 (elt |
1042 '((#x0000 #x007F latin) | 1042 '((#x0000 #x007F latin) |
1043 (#x00A0 #x036F latin) | 1043 (#x00A0 #x024F latin) |
1044 (#x0250 #x02AF phonetic) | |
1045 (#x02B0 #x036F latin) | |
1044 (#x0370 #x03E1 greek) | 1046 (#x0370 #x03E1 greek) |
1045 (#x03E2 #x03EF coptic) | 1047 (#x03E2 #x03EF coptic) |
1046 (#x03F0 #x03F3 greek) | 1048 (#x03F0 #x03F3 greek) |
1047 (#x0400 #x04FF cyrillic) | 1049 (#x0400 #x04FF cyrillic) |
1048 (#x0530 #x058F armenian) | 1050 (#x0530 #x058F armenian) |
1072 (#x1400 #x167F canadian-aboriginal) | 1074 (#x1400 #x167F canadian-aboriginal) |
1073 (#x1680 #x169F ogham) | 1075 (#x1680 #x169F ogham) |
1074 (#x16A0 #x16FF runic) | 1076 (#x16A0 #x16FF runic) |
1075 (#x1780 #x17FF khmer) | 1077 (#x1780 #x17FF khmer) |
1076 (#x1800 #x18AF mongolian) | 1078 (#x1800 #x18AF mongolian) |
1079 (#x1D00 #x1DFF phonetic) | |
1077 (#x1E00 #x1EFF latin) | 1080 (#x1E00 #x1EFF latin) |
1078 (#x1F00 #x1FFF greek) | 1081 (#x1F00 #x1FFF greek) |
1079 (#x2000 #x27FF symbol) | 1082 (#x2000 #x27FF symbol) |
1080 (#x2800 #x28FF braille) | 1083 (#x2800 #x28FF braille) |
1081 (#x2D80 #x2DDF ethiopic) | 1084 (#x2D80 #x2DDF ethiopic) |