Commit 8e99d072 authored by Barry O'Reilly's avatar Barry O'Reilly Committed by Stefan Monnier

* src/keyboard.c (access_keymap_keyremap): Accept anonymous functions.

Fixes: debbugs:12022
parent 96154d32
2012-08-14 Barry OReilly <> (tiny change)
* keyboard.c (access_keymap_keyremap): Accept anonymous functions
2012-08-14 Martin Rudalics <>
* frame.c (make_frame_without_minibuffer, make_minibuffer_frame)
......@@ -8836,7 +8836,7 @@ access_keymap_keyremap (Lisp_Object map, Lisp_Object key, Lisp_Object prompt,
/* If the keymap gives a function, not an
array, then call the function with one arg and use
its value instead. */
if (SYMBOLP (next) && !NILP (Ffboundp (next)) && do_funcall)
if (do_funcall && FUNCTIONP (next))
Lisp_Object tem;
tem = next;
......@@ -641,7 +641,7 @@ clip_to_bounds (ptrdiff_t lower, EMACS_INT num, ptrdiff_t upper)
typedef struct interval *INTERVAL;
/* Complain if object is not string or buffer type */
/* Complain if object is not string or buffer type. */
CHECK_TYPE (STRINGP (x) || BUFFERP (x), Qbuffer_or_string_p, x)
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