From c8823c61e4a5c9f0e175474a1d9c91aabdfdeeab Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Mon, 9 Jun 1997 13:00:07 +0000 Subject: [PATCH] (Faset): Inherit default value correctly while creating sub char table. --- src/data.c | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/src/data.c b/src/data.c index 9a0788ae719..5fb57407cba 100644 --- a/src/data.c +++ b/src/data.c @@ -1701,9 +1701,12 @@ IDX starts at 0.") 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; } -- 2.39.5