--- a/EnterBox.st Sat Mar 18 06:16:33 1995 +0100
+++ b/EnterBox.st Sat Mar 18 06:16:50 1995 +0100
@@ -37,7 +37,7 @@
version
"
-$Header: /cvs/stx/stx/libwidg/EnterBox.st,v 1.17 1995-03-09 02:11:17 claus Exp $
+$Header: /cvs/stx/stx/libwidg/EnterBox.st,v 1.18 1995-03-18 05:14:29 claus Exp $
"
!
@@ -316,9 +316,11 @@
changedObject == enterField ifTrue:[
something == #preferedExtent ifTrue:[
- shown ifTrue:[self resize]
+ shown ifTrue:[self resize].
+ ^ self
]
- ]
+ ].
+ super update:something with:someArgument from:changedObject
! !
!EnterBox methodsFor:'queries'!