diff options
author | Richard M. Stallman <[email protected]> | 1996-05-31 20:10:02 +0000 |
---|---|---|
committer | Richard M. Stallman <[email protected]> | 1996-05-31 20:10:02 +0000 |
commit | 846e8c10a08a1995639e0e383ac96a5047cedac7 (patch) | |
tree | 127852601429cdc74be209ab453b8da13cabc6b5 | |
parent | 1676b2982860347489ce9b47dfa6cf06aa21adf9 (diff) |
(single_submenu): Handle non-keymap lists like symbols.
-rw-r--r-- | src/xmenu.c | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/src/xmenu.c b/src/xmenu.c index ef2bbd792a..1ea7140d50 100644 --- a/src/xmenu.c +++ b/src/xmenu.c @@ -1377,8 +1377,12 @@ single_submenu (item_key, item_name, maps) But don't make a pane that is empty--ignore that map instead. */ for (i = 0; i < len; i++) { - if (SYMBOLP (mapvec[i])) + if (SYMBOLP (mapvec[i]) + || (CONSP (mapvec[i]) + && NILP (Fkeymapp (mapvec[i])))) { + /* Here we have a command at top level in the menu bar + as opposed to a submenu. */ top_level_items = 1; push_menu_pane (Qnil, Qnil); push_menu_item (item_name, Qt, item_key, mapvec[i], Qnil); |