Mercurial > emacs
diff src/data.c @ 18186:8704dc91a5b3
(Faset): Inherit default value correctly while creating
sub char table.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Mon, 09 Jun 1997 13:00:07 +0000 |
| parents | a2029aaffb4f |
| children | c372b7e6669b |
line wrap: on
line diff
--- a/src/data.c Mon Jun 09 12:59:52 1997 +0000 +++ b/src/data.c Mon Jun 09 13:00:07 1997 +0000 @@ -1701,9 +1701,12 @@ array = val; else /* VAL is a leaf. Create a sub char table with the - default value VAL here and look into it. */ + default value VAL or XCHAR_TABLE (array)->defalt + and look into it. */ array = (XCHAR_TABLE (array)->contents[code[i]] - = make_sub_char_table (val)); + = make_sub_char_table (NILP (val) + ? XCHAR_TABLE (array)->defalt + : val)); } XCHAR_TABLE (array)->contents[code[i]] = newelt; }