Mercurial > emacs
comparison src/keyboard.c @ 22469:516ef6b2ceb9
(parse_menu_item): Put a quote around DEF
to pass it as an argument to the filter function.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sat, 13 Jun 1998 05:27:47 +0000 |
parents | 9ec0714b3e0b |
children | ca46e1a32856 |
comparison
equal
deleted
inserted
replaced
22468:9c7650b90c06 | 22469:516ef6b2ceb9 |
---|---|
5799 | 5799 |
5800 /* If got a filter apply it on definition. */ | 5800 /* If got a filter apply it on definition. */ |
5801 def = XVECTOR (item_properties)->contents[ITEM_PROPERTY_DEF]; | 5801 def = XVECTOR (item_properties)->contents[ITEM_PROPERTY_DEF]; |
5802 if (!NILP (filter)) | 5802 if (!NILP (filter)) |
5803 { | 5803 { |
5804 def = menu_item_eval_property (Fcons (XCONS (filter)->car, | 5804 def = menu_item_eval_property (list2 (XCONS (filter)->car, |
5805 Fcons (def, Qnil))); | 5805 list2 (Qquote, def))); |
5806 | |
5806 XVECTOR (item_properties)->contents[ITEM_PROPERTY_DEF] = def; | 5807 XVECTOR (item_properties)->contents[ITEM_PROPERTY_DEF] = def; |
5807 } | 5808 } |
5808 | 5809 |
5809 /* If we got no definition, this item is just unselectable text which | 5810 /* If we got no definition, this item is just unselectable text which |
5810 is OK in a submenu but not in the menubar. */ | 5811 is OK in a submenu but not in the menubar. */ |