--- a/FileBrowserV2UISpecifications.st Sat May 14 07:05:55 2016 +0200
+++ b/FileBrowserV2UISpecifications.st Sun May 15 06:58:33 2016 +0200
@@ -558,41 +558,6 @@
!FileBrowserV2UISpecifications::PanelSpec methodsFor:'computation'!
-recomputeHandlesIn:aPanel
- |subs isVertical|
-
- (subs := aPanel subViews) notNil ifTrue:[
- isVertical := self isVertical.
- ^ subs
- collect:
- [:v | |rel|
- rel := v relativeCorner.
- isVertical ifTrue:[ rel y] ifFalse:[ rel x ].
- ]
- ].
- ^ nil
-!
-
-setLayoutsInLayoutContainer:aPanel
- |x y subs isVertical|
-
- ((subs := aPanel subViews) notNil and:[subs size == handles size]) ifTrue:[
- isVertical := self isVertical.
- y := x := 0.0.
- subs keysAndValuesDo:[:i :v|
- isVertical ifTrue:[
- v relativeOrigin:(0.0 @ y).
- y := handles at:i.
- v relativeCorner:(1.0 @ y).
- ] ifFalse:[
- v relativeOrigin:(x @ 0.0).
- x := handles at:i.
- v relativeCorner:(x @ 1.0).
- ]
- ]
- ]
-!
-
setupInitialLayoutFor:aView
|superView|