Fix typo in previous change's ChangeLog.

[gnu-emacs] / src / print.c

diff --git a/src/print.c b/src/print.c
index 2f52f5d03ecb08f3697b4fc31640e667c6228ea9..57fac7af378c1a541be42dff0e52aa24097df72b 100644 (file)
--- a/src/print.c
+++ b/src/print.c
@@ -1228,7 +1228,8 @@ print_preprocess (Lisp_Object obj)
          size = ASIZE (obj);
          if (size & PSEUDOVECTOR_FLAG)
            size &= PSEUDOVECTOR_SIZE_MASK;
-         for (i = 0; i < size; i++)
+         for (i = (SUB_CHAR_TABLE_P (obj)
+                   ? SUB_CHAR_TABLE_OFFSET : 0); i < size; i++)
            print_preprocess (AREF (obj, i));
          if (HASH_TABLE_P (obj))
            { /* For hash tables, the key_and_value slot is past