procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Don't add an echo dash for the first keystroke (Bug#7137).

Browse source 
* src/keyboard.c (echo_prompt): Function moved into read_key_sequence.
(read_key_sequence): Inline echo_prompt.
(echo_dash): Add a dash only if key is continued (Bug#7137).
This commit is contained in:
Chong Yidong 2010-10-04 14:16:22 -04:00
parent 3e6ae1a4ae
commit 51b403bdcb
2 changed files with 17 additions and 13 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
src/ChangeLog
View file

@ -1,3 +1,9 @@
2010-10-04 Chong Yidong <cyd@stupidchicken.com>
* keyboard.c (echo_prompt): Function moved into read_key_sequence.
(read_key_sequence): Inline echo_prompt.
(echo_dash): Add a dash only if key is continued (Bug#7137).
2010-10-04 Dan Nicolaescu <dann@ics.uci.edu>
Remove O_RDONLY, O_WRONLY definitions, not needed.

24
src/keyboard.c
View file

@ -645,18 +645,6 @@ static int store_user_signal_events (void);
static int cannot_suspend;
/* Install the string STR as the beginning of the string of echoing,
so that it serves as a prompt for the next character.
Also start echoing. */
void
echo_prompt (Lisp_Object str)
{
current_kboard->echo_string = str;
current_kboard->echo_after_prompt = SCHARS (str);
echo_now ();
}
/* Add C to the echo string, if echoing is going on.
C can be a character, which is printed prettily ("M-C-x" and all that
jazz), or a symbol, whose name is printed. */
@ -755,6 +743,9 @@ echo_dash (void)
if (NILP (current_kboard->echo_string))
return;
if (this_command_key_count == 0)
return;
if (!current_kboard->immediate_echo
&& SCHARS (current_kboard->echo_string) == 0)
return;
@ -9125,7 +9116,14 @@ read_key_sequence (Lisp_Object *keybuf, int bufsize, Lisp_Object prompt,
if (INTERACTIVE)
{
if (!NILP (prompt))
echo_prompt (prompt);
{
/* Install the string STR as the beginning of the string of
echoing, so that it serves as a prompt for the next
character. */
current_kboard->echo_string = prompt;
current_kboard->echo_after_prompt = SCHARS (prompt);
echo_now ();
}
else if (cursor_in_echo_area
&& (FLOATP (Vecho_keystrokes) || INTEGERP (Vecho_keystrokes))
&& NILP (Fzerop (Vecho_keystrokes)))