# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 980213695 0
# Node ID cb1dfadd1a18e1958695398a32ffecd2771c3de8
# Parent  340a9e4aeb29849ce9545b74464ef5b197e0de47
(Fset_char_table_default): Fix to make sub char-table correctly.

diff -r 340a9e4aeb29 -r cb1dfadd1a18 src/fns.c
--- a/src/fns.c	Mon Jan 22 23:20:06 2001 +0000
+++ b/src/fns.c	Tue Jan 23 01:34:55 2001 +0000
@@ -2352,10 +2352,11 @@
 	XCHAR_TABLE (char_table)->contents[charset + 128] = value;
       return value;
     }
-  char_table = temp;
-  if (! SUB_CHAR_TABLE_P (char_table))
+  if (SUB_CHAR_TABLE_P (temp))
+    char_table = temp;
+  else
     char_table = (XCHAR_TABLE (char_table)->contents[charset + 128]
-	    = make_sub_char_table (temp));
+		  = make_sub_char_table (temp));
   temp = XCHAR_TABLE (char_table)->contents[code1];
   if (SUB_CHAR_TABLE_P (temp))
     XCHAR_TABLE (temp)->defalt = value;