mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-11 16:08:13 +00:00
Code Issues Releases Activity

* src/keyboard.c (echo_keystrokes_p): Don't test cursor_in_echo_area

Browse Source 
(read_key_sequence): Test it here, as before.
(bug#22825).
This commit is contained in:
Stefan Monnier 2016-03-14 20:52:34 -04:00
parent 8475f3da53
commit e6776f8362
1 changed files with 6 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
src/keyboard.c
View File

@ -430,10 +430,9 @@ kset_system_key_syms (struct kboard *kb, Lisp_Object val)
static bool
echo_keystrokes_p (void)
{
return (!cursor_in_echo_area)
&& (FLOATP (Vecho_keystrokes) ? XFLOAT_DATA (Vecho_keystrokes) > 0.0
: INTEGERP (Vecho_keystrokes) ? XINT (Vecho_keystrokes) > 0
: false);
return (FLOATP (Vecho_keystrokes) ? XFLOAT_DATA (Vecho_keystrokes) > 0.0
: INTEGERP (Vecho_keystrokes) ? XINT (Vecho_keystrokes) > 0
: false);
}
/* Add C to the echo string, without echoing it immediately. C can be
@ -8902,7 +8901,9 @@ read_key_sequence (Lisp_Object *keybuf, int bufsize, Lisp_Object prompt,
if (!echo_keystrokes_p ())
current_kboard->immediate_echo = false;
}
else if (echo_keystrokes_p ())
else if (cursor_in_echo_area /* FIXME: Not sure why we test this here,
maybe we should just drop this test. */
&& echo_keystrokes_p ())
/* This doesn't put in a dash if the echo buffer is empty, so
you don't always see a dash hanging out in the minibuffer. */
echo_dash ();