changed #setChildPositions
authorClaus Gittinger <cg@exept.de>
Tue, 22 Jul 2008 16:15:08 +0200
changeset 3679 3e521d5a375e
parent 3678 eaf7f59d506c
child 3680 f6afac26fe7f
changed #setChildPositions
VerticalPanelView.st
--- 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 $'
 ! !