Applied #9481: submenus for help menu

git-svn-id: https://svn.wxwidgets.org/svn/wx/wxWidgets/trunk@62106 c3d73ce0-8a6f-49c7-b76d-6d57e0e08775

diff --git a/src/osx/menu_osx.cpp b/src/osx/menu_osx.cpp
index 4825f1834028058721d8292af36e6788e0b8dbca..d539e56282eeb1c0bd7f32dfcedca7cbbc48edc2 100644 (file)
--- a/src/osx/menu_osx.cpp
+++ b/src/osx/menu_osx.cpp
@@ -644,6 +644,9 @@ void wxMenuBar::MacInstallMenuBar()
                 if (subMenu)
                 {
                     // we don't support hierarchical menus in the help menu yet
+                    UMAAppendMenuItem(mh, wxStripMenuCodes(item->GetText()) , wxFont::GetDefaultEncoding() );
+                    MenuItemIndex position = CountMenuItems(mh);
+                    ::SetMenuItemHierarchicalMenu(mh, position, MAC_WXHMENU(subMenu->GetHMenu()));
                 }
                 else
                 {