Mercurial > emacs
comparison lisp/international/fontset.el @ 91156:d5ce4acff895
(otf-script-alist): Make all otf tags
4-letters.
(setup-default-fontset): Add OpenType fonts for devanagari and
tamil.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Sat, 01 Dec 2007 04:22:41 +0000 |
| parents | f55f9811f5d7 |
| children | 3f9bb85be0a4 |
comparison
equal
deleted
inserted
replaced
| 91155:95c0d1ad721f | 91156:d5ce4acff895 |
|---|---|
| 189 (hebr . hebrew) | 189 (hebr . hebrew) |
| 190 (kana . kana) | 190 (kana . kana) |
| 191 (knda . kannada) | 191 (knda . kannada) |
| 192 (khar . kharoshthi) | 192 (khar . kharoshthi) |
| 193 (khmr . khmer) | 193 (khmr . khmer) |
| 194 (lao . lao) | 194 (lao\ . lao) |
| 195 (latn . latin) | 195 (latn . latin) |
| 196 (limb . limbu) | 196 (limb . limbu) |
| 197 (linb . linear_b) | 197 (linb . linear_b) |
| 198 (mlym . malayalam) | 198 (mlym . malayalam) |
| 199 (math . mathematical) | 199 (math . mathematical) |
| 200 (mong . mongolian) | 200 (mong . mongolian) |
| 201 (musc . musical-symbol) | 201 (musc . musical-symbol) |
| 202 (mymr . myanmar) | 202 (mymr . myanmar) |
| 203 (nko . nko) | 203 (nko\ . nko) |
| 204 (ogam . ogham) | 204 (ogam . ogham) |
| 205 (ital . old_italic) | 205 (ital . old_italic) |
| 206 (xpeo . old_persian) | 206 (xpeo . old_persian) |
| 207 (orya . oriya) | 207 (orya . oriya) |
| 208 (osma . osmanya) | 208 (osma . osmanya) |
| 221 (thaa . thaana) | 221 (thaa . thaana) |
| 222 (thai . thai) | 222 (thai . thai) |
| 223 (tibt . tibetan) | 223 (tibt . tibetan) |
| 224 (tfng . tifinagh) | 224 (tfng . tifinagh) |
| 225 (ugar . ugaritic) | 225 (ugar . ugaritic) |
| 226 (yi . yi))) | 226 (yi\ \ . yi))) |
| 227 | 227 |
| 228 ;; Set standard fontname specification of characters in the default | 228 ;; Set standard fontname specification of characters in the default |
| 229 ;; fontset to find an appropriate font for each script/charset. The | 229 ;; fontset to find an appropriate font for each script/charset. The |
| 230 ;; specification has the form ((SCRIPT FONT-SPEC ...) ...), where | 230 ;; specification has the form ((SCRIPT FONT-SPEC ...) ...), where |
| 231 ;; FONT-SPEC is: | 231 ;; FONT-SPEC is: |
| 247 | 247 |
| 248 (defun setup-default-fontset () | 248 (defun setup-default-fontset () |
| 249 "Setup the default fontset." | 249 "Setup the default fontset." |
| 250 (new-fontset | 250 (new-fontset |
| 251 "fontset-default" | 251 "fontset-default" |
| 252 '(;; for each script | 252 `(;; for each script |
| 253 (latin (nil . "ISO8859-1") | 253 (latin (nil . "ISO8859-1") |
| 254 (nil . "ISO8859-2") | 254 (nil . "ISO8859-2") |
| 255 (nil . "ISO8859-3") | 255 (nil . "ISO8859-3") |
| 256 (nil . "ISO8859-4") | 256 (nil . "ISO8859-4") |
| 257 (nil . "ISO8859-9") | 257 (nil . "ISO8859-9") |
| 262 (nil . "VISCII1.1-1")) | 262 (nil . "VISCII1.1-1")) |
| 263 | 263 |
| 264 (thai (nil . "TIS620*") | 264 (thai (nil . "TIS620*") |
| 265 (nil . "ISO8859-11")) | 265 (nil . "ISO8859-11")) |
| 266 | 266 |
| 267 (devanagari (nil . "iso10646.indian-1")) | 267 (devanagari ,(font-spec :registry "iso10646-1" :otf '(deva nil (rphf))) |
| 268 (nil . "iso10646.indian-1")) | |
| 269 (tamil ,(font-spec :registry "iso10646-1" :otf '(taml nil (akhn)))) | |
| 268 | 270 |
| 269 (lao (nil . "MuleLao-1")) | 271 (lao (nil . "MuleLao-1")) |
| 270 | 272 |
| 271 (tai-viet ("TaiViet" . "iso10646-1")) | 273 (tai-viet ("TaiViet" . "iso10646-1")) |
| 272 | 274 |