--- a/EnterBox.st	Mon Jul 27 19:37:49 1998 +0200
+++ b/EnterBox.st	Mon Jul 27 20:16:10 1998 +0200
@@ -17,7 +17,7 @@
 	category:'Views-DialogBoxes'
 !
 
-!EnterBox  class methodsFor:'documentation'!
+!EnterBox class methodsFor:'documentation'!
 
 copyright
 "
@@ -229,7 +229,7 @@
     "Modified: 16.11.1995 / 21:28:11 / cg"
 ! !
 
-!EnterBox  class methodsFor:'instance creation'!
+!EnterBox class methodsFor:'instance creation'!
 
 action:aBlock
     "create and return a new EnterBox 
@@ -267,23 +267,24 @@
     ^ (self title:titleString action:aBlock) okText:okText
 ! !
 
-!EnterBox  class methodsFor:'defaults'!
+!EnterBox class methodsFor:'defaults'!
 
 defaultExtent
     "return the default extent of my instances.
      The value returned here is usually ignored, and
      the value from preferredExtent taken instead."
 
-    ^ (Screen current pixelPerMillimeter * (60 @ 30)) rounded
+    ^ (Screen current pixelPerMillimeter * (60 @ 20)) rounded
 
-    "Modified: 22.4.1996 / 23:36:17 / cg"
+    "Modified: / 22.1.1998 / 09:57:26 / md"
+    "Modified: / 27.7.1998 / 20:15:52 / cg"
 !
 
 minExtent
     ^ self defaultExtent
 ! !
 
-!EnterBox  class methodsFor:'easy startup '!
+!EnterBox class methodsFor:'easy startup '!
 
 request:aTitle
     "create and show an enterBox asking for aTitle.
@@ -661,8 +662,8 @@
     "Modified: 22.5.1996 / 15:24:30 / cg"
 ! !
 
-!EnterBox  class methodsFor:'documentation'!
+!EnterBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/EnterBox.st,v 1.45 1996-07-19 18:51:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EnterBox.st,v 1.46 1998-07-27 18:16:10 cg Exp $'
 ! !