X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/2e97b58c63b490d77efaac17d7d0fafd403d0468..850c6ed46e3da19d897c2eac500d8917e6b29ced:/src/mac/carbon/choice.cpp

diff --git a/src/mac/carbon/choice.cpp b/src/mac/carbon/choice.cpp
index 46e08be0d5..ac29f3125b 100644
--- a/src/mac/carbon/choice.cpp
+++ b/src/mac/carbon/choice.cpp
@@ -21,7 +21,15 @@ IMPLEMENT_DYNAMIC_CLASS(wxChoice, wxControl)
 extern MenuHandle NewUniqueMenu() ;
 wxChoice::~wxChoice()
 {
-	// DeleteMenu( m_macPopUpMenuId ) ;
+    if ( HasClientObjectData() )
+    {
+        size_t i, max = GetCount();
+
+        for ( i = 0; i < max; ++i )
+            delete GetClientObject(i);
+    }
+
+        // DeleteMenu( m_macPopUpMenuId ) ;
 	// DisposeMenu( m_macPopUpMenuHandle ) ;
 }
 bool wxChoice::Create(wxWindow *parent, wxWindowID id,
@@ -221,4 +229,4 @@ wxSize wxChoice::DoGetBestSize() const
 	    
 	}
     return wxSize(lbWidth, lbHeight);
-}
\ No newline at end of file
+}