diff options
| author | Richard M. Stallman | 1998-06-13 05:27:47 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1998-06-13 05:27:47 +0000 |
| commit | c5c5a6f8d1967178ba9bfc4ce2ca63fb4ee04774 (patch) | |
| tree | bfbd1a2f885ef2ea4eda17539a007f7fa70ab415 | |
| parent | b720878d35718db40268db05f25945c3ccf64199 (diff) | |
| download | emacs-c5c5a6f8d1967178ba9bfc4ce2ca63fb4ee04774.tar.gz emacs-c5c5a6f8d1967178ba9bfc4ce2ca63fb4ee04774.zip | |
(parse_menu_item): Put a quote around DEF
to pass it as an argument to the filter function.
| -rw-r--r-- | src/keyboard.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/keyboard.c b/src/keyboard.c index cf793b1909a..fee59e3af95 100644 --- a/src/keyboard.c +++ b/src/keyboard.c | |||
| @@ -5801,8 +5801,9 @@ parse_menu_item (item, notreal, inmenubar) | |||
| 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 | ||