ensure selected calc sheet tab is always visible, and we use space sensibly.

Change-Id: I0f935f324ba31784185959a4a4d2c306d4b592d8

1 files changed, 15 insertions, 1 deletions

diff --git a/svtools/source/control/tabbar.cxx b/svtools/source/control/tabbar.cxx
index f410a7d7c795..62ca3708999c 100644
--- a/svtools/source/control/tabbar.cxx
+++ b/svtools/source/control/tabbar.cxx
@@ -645,7 +645,7 @@ void TabBar::ImplFormat()
             pItem->maRect.SetEmpty();
         else
         {
-            // Slightly befor the tab before the first visible page
+            // Slightly before the tab before the first visible page
             // should also be visible
             if ( n+1 == mnFirstPos )
                 pItem->maRect.Left() = x-pItem->mnWidth;
@@ -1535,6 +1535,20 @@ void TabBar::Resize()
     {
         if ( ImplCalcWidth() )
             Invalidate();
+
+        ImplFormat();
+
+        // Ensure as many tabs as possible are visible:
+        sal_uInt16 nLastFirstPos = ImplGetLastFirstPos();
+        if ( mnFirstPos > nLastFirstPos )
+        {
+            mnFirstPos = nLastFirstPos;
+            mbFormat = sal_True;
+            Invalidate();
+        }
+        // Ensure the currently selected page is visible
+        ImplShowPage( GetPagePos( mnCurPageId ) );
+
         ImplFormat();
     }