drr: avoid making the window jump wider when a new tab is created.

(this one has been bugging me for _far_ too long)
This commit is contained in:
Robby Findler 2010-12-04 13:04:29 -06:00
parent 3a506e5acb
commit 71cf40c4b7

View File

@ -154,6 +154,10 @@
[frame (send tab get-frame)])
(when (send frame initialized?)
(send frame begin-container-sequence)
;; avoid any time with both sets of buttons in the panel so the window doesn't get too wide
(send (send frame get-toolbar-button-panel) change-children (λ (x) '()))
(let ([directly-specified-buttons
(map (λ (button-spec)
(new switchable-button%