--- a/EnterBox.st	Fri Nov 06 12:38:07 2009 +0100
+++ b/EnterBox.st	Fri Nov 06 15:27:52 2009 +0100
@@ -499,9 +499,8 @@
 
     self addComponent:(enterField := aWidget).
     enterField 
-        origin:[0.0 @ (space2 + labelField preferredHeight "height")]
-        extent:(1.0 @ enterField height).
-    enterField 
+        width:1.0;
+        origin:[0.0 @ (space2 + labelField preferredHeight "height")];
         leftInset:ViewSpacing-enterField borderWidth; 
         rightInset:ViewSpacing.
 
@@ -711,5 +710,9 @@
 !EnterBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/EnterBox.st,v 1.66 2009-09-29 13:04:51 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EnterBox.st,v 1.67 2009-11-06 14:27:52 stefan Exp $'
+!
+
+version_CVS
+    ^ '$Header: /cvs/stx/stx/libwidg/EnterBox.st,v 1.67 2009-11-06 14:27:52 stefan Exp $'
 ! !