*** empty log message ***

diff --git a/src/ChangeLog b/src/ChangeLog
index 1d09bde8487fbb2fdb15a05ad329cde370bf85fc..fbf38e28ba11b4f3ff2c417d6e4b660b37a5c740 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,11 @@
+2005-04-22  Kenichi Handa  <handa@m17n.org>
+
+       * fns.c (copy_sub_char_table): Explicitly copy the default value
+       of the sub-chartable.
+
+       * fontset.c (fontset_set): When a sub-chartable is created,
+       explicitly sets the defalt value.
+
 2005-04-22  Kim F. Storm  <storm@cua.dk>
 
        * fns.c (Fplist_get): Replace by Fsafe_plist_get.

diff --git a/src/fontset.c b/src/fontset.c
index c1de33fcf066db372154c4aa2f46ecc0137b60ff..8ef708fa51eef2edf42e68b1ca65a9eb64582cd4 100644 (file)
--- a/src/fontset.c
+++ b/src/fontset.c
@@ -353,7 +353,11 @@ fontset_set (fontset, c, newelt)
   for (i = 0; code[i] > 0; i++)
     {
       if (!SUB_CHAR_TABLE_P (*elt))
-       *elt = make_sub_char_table (*elt);
+       {
+         Lisp_Object val = *elt;
+         *elt = make_sub_char_table (val);
+         XCHAR_TABLE (*elt)->defalt = val;
+       }
       elt = &XCHAR_TABLE (*elt)->contents[code[i]];
     }
   if (SUB_CHAR_TABLE_P (*elt))