--- a/VerticalPanelView.st Fri Jul 18 16:32:30 2008 +0200
+++ b/VerticalPanelView.st Tue Jul 22 16:15:08 2008 +0200
@@ -862,9 +862,9 @@
((l == #top) or:[l == #topSpace
or:[l == #topFit or:[l == #topSpaceFit]]]) ifTrue:[
(l == #top or:[l == #topFit]) ifTrue:[
- space := space min:(restHeight - m2) // ((numChilds - 1) max:1).
+ space := space min:((restHeight - m2) // numChilds).
] ifFalse:[
- space := space min:(restHeight - m2) // (numChilds "+ 1").
+ space := space min:((restHeight - m2) // (numChilds + 1)).
].
(vL == #fixTop or:[vL == #fixTopSpace]) ifTrue:[
space := space max:verticalSpace.
@@ -1101,5 +1101,5 @@
!VerticalPanelView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/VerticalPanelView.st,v 1.45 2008-07-18 14:32:30 mb Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/VerticalPanelView.st,v 1.46 2008-07-22 14:15:08 cg Exp $'
! !