From 2e001b40ad0d19c8db528bb4df739e289163779d Mon Sep 17 00:00:00 2001
From: Caolán McNamara <caolanm@redhat.com>
Date: Fri, 20 Oct 2017 12:33:57 +0100
Subject: Resolves: tdf#113252 missing tabs in basic library organizer

Like SfxTabDialog, as in interim measure throw away the TabPage if its not
suitable for reuse

Change-Id: If8247ea37dfca42e690716a8b687677e0f73c9a8
---
 basctl/source/basicide/moduldlg.cxx | 7 +++++++
 1 file changed, 7 insertions(+)

(limited to 'basctl')

diff --git a/basctl/source/basicide/moduldlg.cxx b/basctl/source/basicide/moduldlg.cxx
index 47f8b4209f3d..dd5b4697f135 100644
--- a/basctl/source/basicide/moduldlg.cxx
+++ b/basctl/source/basicide/moduldlg.cxx
@@ -458,6 +458,13 @@ OrganizeDialog::OrganizeDialog(vcl::Window* pParent, sal_Int16 tabId,
 {
     get(m_pTabCtrl, "tabcontrol");
 
+    sal_uInt16 nPageCount = m_pTabCtrl->GetPageCount();
+    for (sal_uInt16 nPage = 0; nPage < nPageCount; ++nPage)
+    {
+        sal_uInt16 nPageId = m_pTabCtrl->GetPageId(nPage);
+        m_pTabCtrl->SetTabPage(nPageId, nullptr);
+    }
+
     m_pTabCtrl->SetActivatePageHdl(LINK(this, OrganizeDialog, ActivatePageHdl));
 
     if( tabId == 0 )
-- 
cgit