diff -r 62d6d9ddc1af -r e5587ebe55e3 VerticalPanelView.st --- a/VerticalPanelView.st Sun Oct 16 13:52:15 2016 +0200 +++ b/VerticalPanelView.st Mon Oct 17 16:02:12 2016 +0200 @@ -1093,8 +1093,8 @@ subViews do:[:child | |childsPreference| - false "child realized" ifTrue:[ - childsPreference := child extent. + child realized ifTrue:[ + childsPreference := child extent max:child preferredExtent. ] ifFalse:[ childsPreference := child preferredExtent. ].