Commit 9c3f66a3 authored by Gerd Moellmann's avatar Gerd Moellmann

(read_char): Bind message-truncate-lines to t

while displaying a help-echo.
parent ad4f174e
......@@ -2639,7 +2639,9 @@ read_char (commandflag, nmaps, maps, prev_event, used_mouse_menu)
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 @@ read_char (commandflag, nmaps, maps, prev_event, used_mouse_menu)
message (0);
}
unbind_to (count, Qnil);
goto retry;
}
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment