From 223509a3a0170623fd9d6019dbdfbc26bde71553 Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Fri, 3 Apr 2009 06:26:50 +0000 Subject: [PATCH] (print_object): Make each lowest sub_char_table start a new line. --- src/ChangeLog | 5 +++++ src/print.c | 7 +++++++ 2 files changed, 12 insertions(+) diff --git a/src/ChangeLog b/src/ChangeLog index 1b2af1639ea..08be07b117d 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,8 @@ +2009-04-03 Kenichi Handa + + * print.c (print_object): Make each lowest sub_char_table start a + new line (Bug#2866). + 2009-04-02 Kenichi Handa * fontset.c (fontset_font): Record no-font when a fontset diff --git a/src/print.c b/src/print.c index 738f4f678ed..e78f593c7b5 100644 --- a/src/print.c +++ b/src/print.c @@ -2116,6 +2116,13 @@ print_object (obj, printcharfun, escapeflag) /* We print a char-table as if it were a vector, lumping the parent and default slots in with the character slots. But we add #^ as a prefix. */ + + /* Make each lowest sub_char_table start a new line. + Otherwise we'll make a line extremely long, which + results in slow redisplay. */ + if (SUB_CHAR_TABLE_P (obj) + && XINT (XSUB_CHAR_TABLE (obj)->depth) == 3) + PRINTCHAR ('\n'); PRINTCHAR ('#'); PRINTCHAR ('^'); if (SUB_CHAR_TABLE_P (obj)) -- 2.39.5