added preferredWidth & preferredHeight
authorClaus Gittinger <cg@exept.de>
Fri, 30 May 2008 14:24:39 +0200
changeset 3608 1befa7fdb7aa
parent 3607 242d08639bcc
child 3609 3bd1b03b1ffb
added preferredWidth & preferredHeight
EnterBox.st
--- a/EnterBox.st	Fri May 30 14:24:28 2008 +0200
+++ b/EnterBox.st	Fri May 30 14:24:39 2008 +0200
@@ -499,7 +499,7 @@
 
     self addComponent:(enterField := aWidget).
     enterField 
-        origin:[0.0 @ (space2 + labelField preferredExtent y "height")]
+        origin:[0.0 @ (space2 + labelField preferredHeight "height")]
         extent:(1.0 @ enterField height).
     enterField 
         leftInset:ViewSpacing-enterField borderWidth; 
@@ -703,5 +703,5 @@
 !EnterBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/EnterBox.st,v 1.61 2008-04-22 10:55:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EnterBox.st,v 1.62 2008-05-30 12:24:39 cg Exp $'
 ! !