EnterBox.st
changeset 3608 1befa7fdb7aa
parent 3586 8ca9325e2159
child 3770 585a35abda71
--- 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 $'
 ! !