diff --git a/collects/framework/private/panel.ss b/collects/framework/private/panel.ss index 5c3c112d..c7f83f80 100644 --- a/collects/framework/private/panel.ss +++ b/collects/framework/private/panel.ss @@ -215,8 +215,6 @@ (icon:get-up/down-cursor) (icon:get-left/right-cursor))) - (super-instantiate (parent)) - (inherit get-client-size container-flow-modified) (init-field [bar-thickness 5]) @@ -392,7 +390,9 @@ (loop (cdr percentages) (cdr children-info) (max (/ child-major (percentage-% percentage)) major-size) - (max child-minor minor-size))))]))))) + (max child-minor minor-size))))]))) + + (super-instantiate (parent)))) (define three-bar-pen-bar-width 8)