Commit 7e05cdaf authored by Stefan Monnier's avatar Stefan Monnier
Browse files

(keymap_memberp): Ensure that nil is not a member.

parent 45e680a8
2000-10-16 Stefan Monnier <monnier@cs.yale.edu>
* keymap.c (keymap_memberp): Ensure that nil is not a member.
2000-10-16 Gerd Moellmann <gerd@gnu.org> 2000-10-16 Gerd Moellmann <gerd@gnu.org>
* xdisp.c (set_iterator_to_next): Reset box start and end flags of * xdisp.c (set_iterator_to_next): Reset box start and end flags of
......
...@@ -311,6 +311,7 @@ int ...@@ -311,6 +311,7 @@ int
keymap_memberp (map, maps) keymap_memberp (map, maps)
Lisp_Object map, maps; Lisp_Object map, maps;
{ {
if (NILP (map)) return 0;
while (KEYMAPP (maps) && !EQ (map, maps)) while (KEYMAPP (maps) && !EQ (map, maps))
maps = Fkeymap_parent (maps); maps = Fkeymap_parent (maps);
return (EQ (map, maps)); return (EQ (map, maps));
......
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