Commit fb33fa43 authored by Stefan Monnier's avatar Stefan Monnier

* src/keymap.c (Fdefine_key): Fix Lisp_Object/int mixup; apply some CSE.

parent 92f2affc
2011-08-02 Stefan Monnier <monnier@iro.umontreal.ca>
* keymap.c (Fdefine_key): Fix Lisp_Object/int mixup; apply some CSE.
2010-12-03 Don March <don@ohspite.net>
* keymap.c (Fdefine_key): Fix non-prefix key error message when
......
......@@ -1217,16 +1217,9 @@ binding KEY to DEF is added at the front of KEYMAP. */)
keymap = get_keymap (cmd, 0, 1);
if (!CONSP (keymap))
{
char trailing_esc[5];
if (c == meta_prefix_char && metized)
{
if (idx == 0)
strcpy(trailing_esc, "ESC");
else
strcpy(trailing_esc, " ESC");
}
else
strcpy(trailing_esc, "");
const char *trailing_esc = ((EQ (c, meta_prefix_char) && metized)
? (idx == 0 ? "ESC" : " ESC")
: "");
/* We must use Fkey_description rather than just passing key to
error; key might be a vector, not a string. */
......
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