* fns.c (Fset_char_table_default): Check that a charset is defined before checking...

diff --git a/src/ChangeLog b/src/ChangeLog
index c47a6b633f5713f772c2717bde6632a41e805897..9202673757e9496944554fd8dd0664133f8a3900 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
+2001-07-18  Ken Raeburn  <raeburn@gnu.org>
+
+       * fns.c (Fset_char_table_default): Check that a charset is defined
+       before checking its dimension.
+
 2001-07-17  Ken Raeburn  <raeburn@gnu.org>
 
        * coding.c (setup_coding_system): Don't do any designation based

diff --git a/src/fns.c b/src/fns.c
index 2b398e08ce5ee3b6715e468ac56f6c711aaa61e1..ba1498f0f89dad0fda449ead3efe189e174a6a70 100644 (file)
--- a/src/fns.c
+++ b/src/fns.c
@@ -2353,7 +2353,7 @@ See also the documentation of make-char.")
 
   /* Even if C is not a generic char, we had better behave as if a
      generic char is specified.  */
-  if (CHARSET_DIMENSION (charset) == 1)
+  if (!CHARSET_DEFINED_P (charset) || CHARSET_DIMENSION (charset) == 1)
     code1 = 0;
   temp = XCHAR_TABLE (char_table)->contents[charset + 128];
   if (!code1)