Mercurial > emacs
changeset 96089:67f05963ef0d
(setup-default-fontset): Specify script for latin use of iso10646-1.
Fix use of lang tags.
| author | Jason Rumney <jasonr@gnu.org> |
|---|---|
| date | Fri, 20 Jun 2008 08:00:56 +0000 |
| parents | bdeece3f0482 |
| children | 596ac435a025 |
| files | lisp/ChangeLog lisp/international/fontset.el |
| diffstat | 2 files changed, 9 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Fri Jun 20 06:12:33 2008 +0000 +++ b/lisp/ChangeLog Fri Jun 20 08:00:56 2008 +0000 @@ -1,3 +1,8 @@ +2008-06-20 Jason Rumney <jasonr@gnu.org> + + * international/fontset.el (setup-default-fontset): Specify script + for latin use of iso10646-1. Fix use of lang tags. + 2008-06-19 Miles Bader <miles@gnu.org> * face-remap.el (text-scale-increase): Start from zero if
--- a/lisp/international/fontset.el Fri Jun 20 06:12:33 2008 +0000 +++ b/lisp/international/fontset.el Fri Jun 20 08:00:56 2008 +0000 @@ -297,7 +297,7 @@ (nil . "ISO8859-15") (nil . "ISO8859-16") (nil . "VISCII1.1-1") - (nil . "ISO10646-1")) + ,(font-spec :registry "iso10646-1" :script 'latin)) (phonetic ,(font-spec :registry "iso10646-1" :script 'phonetic)) @@ -423,11 +423,11 @@ (nil . "gb18030") (nil . "JISX0213.2000-1") (nil . "JISX0213.2000-2") - ,(font-spec :registry "iso10646-1" :language 'ja) - ,(font-spec :registry "iso10646-1" :language 'zh)) + ,(font-spec :registry "iso10646-1" :lang 'ja) + ,(font-spec :registry "iso10646-1" :lang 'zh)) (hangul (nil . "KSC5601.1987-0") - ,(font-spec :registry "iso10646-1" :language 'ko)) + ,(font-spec :registry "iso10646-1" :lang 'ko)) (braille ,(font-spec :registry "iso10646-1" :script 'braille))