FileBrowser.st
changeset 8162 ce82737d13f2
parent 7836 28e4fbd10b9d
child 8177 ce4dbaadb792
--- a/FileBrowser.st	Fri May 30 14:25:08 2008 +0200
+++ b/FileBrowser.st	Fri May 30 14:25:34 2008 +0200
@@ -3965,7 +3965,7 @@
     menuPanel receiver:self.
     menuPanel menu:(self pullDownMenu).
 
-    mH := menuPanel preferredExtent y.
+    mH := menuPanel preferredHeight.
     menuPanel origin:(0.0 @ 0.0) corner:(1.0 @ (mH)).
 
     labelFrame := View 
@@ -4160,7 +4160,7 @@
     layout := LayoutFrame
         leftFraction:0 offset:1
         rightFraction:1 offset:-1
-        topFraction:1 offset:(commandView preferredExtent y + 1) negated
+        topFraction:1 offset:(commandView preferredHeight + 1) negated
         bottomFraction:1 offset:-1.
 
     commandView layout:layout.
@@ -7486,5 +7486,5 @@
 !FileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.623 2007-09-17 09:36:37 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.624 2008-05-30 12:25:34 cg Exp $'
 ! !