(map_char_table): Ignore char-table entries for

charsets eight-bit-control and eight-bit-graphic.
2000-05-26 07:26:53 +00:00
parent afc125e1e9
commit df2fbcebeb
1 changed files with 4 additions and 1 deletions
--- a/src/fns.c
+++ b/src/fns.c
@@ -2372,7 +2372,10 @@ map_char_table (c_function, function, subtable, arg, depth, indices)
      elt = XCHAR_TABLE (subtable)->contents[i];
      XSETFASTINT (indices[depth], i);
      charset = XFASTINT (indices[0]) - 128;
-      if (!CHARSET_DEFINED_P (charset))
+      if (depth == 0
+	  && (!CHARSET_DEFINED_P (charset)
+	      || charset == CHARSET_8_BIT_CONTROL
+	      || charset == CHARSET_8_BIT_GRAPHIC))
 	continue;

      if (SUB_CHAR_TABLE_P (elt))