Commit e31560a7 authored by Stefan Monnier's avatar Stefan Monnier

* src/keyboard.c (active_maps): Fcurrent_active_maps expects a position, not

an event.
parent 5267e6d3
2013-02-14 Stefan Monnier <monnier@iro.umontreal.ca>
* keyboard.c (active_maps): Fcurrent_active_maps expects a position, not
an event.
2013-02-13 Stefan Monnier <monnier@iro.umontreal.ca>
* keyboard.c (syms_of_keyboard): Further tweaks of docstring.
......
......@@ -8644,7 +8644,8 @@ follow_key (Lisp_Object keymap, Lisp_Object key)
static Lisp_Object
active_maps (Lisp_Object first_event)
{
Lisp_Object position = INTEGERP (first_event) ? Qnil : first_event;
Lisp_Object position
= CONSP (first_event) ? CAR_SAFE (XCDR (first_event)) : Qnil;
return Fcons (Qkeymap, Fcurrent_active_maps (Qt, position));
}
......
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