Mercurial > emacs
diff src/keyboard.c @ 29635:f276bf2f52f0
(read_char): Bind message-truncate-lines to t
while displaying a help-echo.
author | Gerd Moellmann <gerd@gnu.org> |
---|---|
date | Tue, 13 Jun 2000 23:51:00 +0000 |
parents | dfb72889ff52 |
children | acaa36b47f50 |
line wrap: on
line diff
--- a/src/keyboard.c Tue Jun 13 23:50:22 2000 +0000 +++ b/src/keyboard.c Tue Jun 13 23:51:00 2000 +0000 @@ -2639,7 +2639,9 @@ if (CONSP (c) && EQ (XCAR (c), Qhelp_echo)) { Lisp_Object msg; - + int count = specpdl_ptr - specpdl; + + specbind (Qmessage_truncate_lines, Qt); msg = XCDR (XCDR (c)); if (!NILP (Vshow_help_function)) @@ -2657,6 +2659,7 @@ message (0); } + unbind_to (count, Qnil); goto retry; }