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);