# HG changeset patch # User Richard M. Stallman # Date 897715667 0 # Node ID 516ef6b2ceb9fc8537c0b40bc35560be256d2162 # Parent 9c7650b90c06875ef42c914e06420f058f2517da (parse_menu_item): Put a quote around DEF to pass it as an argument to the filter function. diff -r 9c7650b90c06 -r 516ef6b2ceb9 src/keyboard.c --- a/src/keyboard.c Sat Jun 13 05:04:42 1998 +0000 +++ b/src/keyboard.c Sat Jun 13 05:27:47 1998 +0000 @@ -5801,8 +5801,9 @@ def = XVECTOR (item_properties)->contents[ITEM_PROPERTY_DEF]; if (!NILP (filter)) { - def = menu_item_eval_property (Fcons (XCONS (filter)->car, - Fcons (def, Qnil))); + def = menu_item_eval_property (list2 (XCONS (filter)->car, + list2 (Qquote, def))); + XVECTOR (item_properties)->contents[ITEM_PROPERTY_DEF] = def; }