Commit a1bfe073 authored by Kim F. Storm's avatar Kim F. Storm

(Fkey_description): Change callers.

parent b378e2c7
......@@ -612,7 +612,7 @@ supply if the command inquires which events were used to invoke it. */)
Qnil, Qnil, Qnil, Qnil);
unbind_to (speccount1, Qnil);
teml = args[i];
visargs[i] = Fkey_description (teml);
visargs[i] = Fkey_description (teml, Qnil);
/* If the key sequence ends with a down-event,
discard the following up-event. */
......@@ -639,7 +639,7 @@ supply if the command inquires which events were used to invoke it. */)
args[i] = Fread_key_sequence (build_string (callint_message),
Qnil, Qt, Qnil, Qnil);
teml = args[i];
visargs[i] = Fkey_description (teml);
visargs[i] = Fkey_description (teml, Qnil);
unbind_to (speccount1, Qnil);
/* If the key sequence ends with a down-event,
......
......@@ -808,7 +808,7 @@ thus, \\=\\=\\=\\= puts \\=\\= into the output, and \\=\\=\\=\\[ puts \\=\\[ int
}
else
{ /* function is on a key */
tem = Fkey_description (tem);
tem = Fkey_description (tem, Qnil);
goto subst_string;
}
}
......
......@@ -7407,7 +7407,7 @@ parse_menu_item (item, notreal, inmenubar)
newcache = chkcache;
if (chkcache)
{
tem = Fkey_description (tem);
tem = Fkey_description (tem, Qnil);
if (CONSP (prefix))
{
if (STRINGP (XCAR (prefix)))
......@@ -9806,7 +9806,7 @@ DEFUN ("execute-extended-command", Fexecute_extended_command, Sexecute_extended_
int count = SPECPDL_INDEX ();
record_unwind_protect (pop_message_unwind, Qnil);
binding = Fkey_description (bindings);
binding = Fkey_description (bindings, Qnil);
newmessage
= (char *) alloca (SCHARS (SYMBOL_NAME (function))
......
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