Mercurial > emacs
changeset 90642:92baf98563e4
(Qlatin): New variable.
(syms_of_fontset): Define it as a lisp symbol.
(Fset_fontset_font): If TARGET is `latin', use FONT_SPEC for
ASCII.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Mon, 30 Oct 2006 06:51:56 +0000 |
| parents | 54f7efcb326f |
| children | 02275d5d2f2c |
| files | src/fontset.c |
| diffstat | 1 files changed, 11 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/src/fontset.c Fri Oct 27 07:37:22 2006 +0000 +++ b/src/fontset.c Mon Oct 30 06:51:56 2006 +0000 @@ -202,6 +202,7 @@ static Lisp_Object Qfontset; static Lisp_Object Qfontset_info; static Lisp_Object Qprepend, Qappend; +static Lisp_Object Qlatin; /* Vector containing all fontsets. */ static Lisp_Object Vfontset_table; @@ -1669,6 +1670,15 @@ map_char_table (accumulate_script_ranges, Qnil, Vchar_script_table, val); range_list = XCDR (val); + if (EQ (target, Qlatin)) + { + if (VECTORP (font_spec)) + val = generate_ascii_font_name (FONTSET_NAME (fontset), + font_spec); + else + val = font_spec; + FONTSET_ASCII (fontset) = val; + } } if (CHARSETP (target)) { @@ -2388,6 +2398,7 @@ DEFSYM (Qprepend, "prepend"); DEFSYM (Qappend, "append"); + DEFSYM (Qlatin, "latin"); Vcached_fontset_data = Qnil; staticpro (&Vcached_fontset_data);