diff options
| author | Richard M. Stallman <rms@gnu.org> | 1996-05-31 20:10:02 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1996-05-31 20:10:02 +0000 |
| commit | 846e8c10a08a1995639e0e383ac96a5047cedac7 (patch) | |
| tree | 127852601429cdc74be209ab453b8da13cabc6b5 /src/xmenu.c | |
| parent | 1676b2982860347489ce9b47dfa6cf06aa21adf9 (diff) | |
| download | emacs-846e8c10a08a1995639e0e383ac96a5047cedac7.tar.gz | |
(single_submenu): Handle non-keymap lists like symbols.
Diffstat (limited to 'src/xmenu.c')
| -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 ef2bbd792ac..1ea7140d50f 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); |