* src/keyboard.c (echo_add_key): Use recently rebound C-h key C-q (bug#60249)
This commit is contained in:
parent
706ed85285
commit
60418e6f09
1 changed files with 2 additions and 3 deletions
|
@ -503,11 +503,10 @@ echo_add_key (Lisp_Object c)
|
||||||
if ((NILP (echo_string) || SCHARS (echo_string) == 0)
|
if ((NILP (echo_string) || SCHARS (echo_string) == 0)
|
||||||
&& help_char_p (c))
|
&& help_char_p (c))
|
||||||
{
|
{
|
||||||
AUTO_STRING (str, " (Type ? for further options, q for quick help)");
|
AUTO_STRING (str, " (Type ? for further options, C-q for quick help)");
|
||||||
AUTO_LIST2 (props, Qface, Qhelp_key_binding);
|
AUTO_LIST2 (props, Qface, Qhelp_key_binding);
|
||||||
Fadd_text_properties (make_fixnum (7), make_fixnum (8), props, str);
|
Fadd_text_properties (make_fixnum (7), make_fixnum (8), props, str);
|
||||||
Fadd_text_properties (make_fixnum (30), make_fixnum (31), props,
|
Fadd_text_properties (make_fixnum (30), make_fixnum (33), props, str);
|
||||||
str);
|
|
||||||
new_string = concat2 (new_string, str);
|
new_string = concat2 (new_string, str);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue