# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 1233143405 0
# Node ID b37403eedfa915df5717d35d4a804501a22be62a
# Parent  8eb53d4d4b78c887e008f7b850ccf6399a01eb6f
(font_for_char): Use assq_no_quit, not assoc_no_quit.
(fontset_get_font_group): Remember that no font-group is specified
for C.

diff -r 8eb53d4d4b78 -r b37403eedfa9 src/fontset.c
--- a/src/fontset.c	Wed Jan 28 09:38:42 2009 +0000
+++ b/src/fontset.c	Wed Jan 28 11:50:05 2009 +0000
@@ -89,7 +89,8 @@
    An element of a base fontset is a vector of FONT-DEFs which itself
    is a vector [ FONT-SPEC ENCODING REPERTORY ].
 
-   An element of a realized fontset is nil, t, or a vector of this form:
+   An element of a realized fontset is nil, t, 0, or a vector of this
+   form:
 
 	[ CHARSET-ORDERED-LIST-TICK PREFERRED-RFONT-DEF
 	  RFONT-DEF0 RFONT-DEF1 ... ]
@@ -107,6 +108,10 @@
    The value t means that no font is available for the corresponding
    range of characters.
 
+   The value 0 means that no font is available for the corresponding
+   range of characters in this fontset, but may be available in the
+   default fontset.
+
 
    A fontset has 9 extra slots.
 
@@ -474,7 +479,11 @@
   else
     font_group = FONTSET_FALLBACK (base_fontset);
   if (NILP (font_group))
-    return Qnil;
+    {
+      if (c >= 0)
+	char_table_set_range (fontset, from, to, make_number (0));
+      return Qnil;
+    }
   font_group = Fcopy_sequence (font_group);
   for (i = 0; i < ASIZE (font_group); i++)
     if (! NILP (AREF (font_group, i)))