--- a/TextBox.st Sun Oct 26 21:09:46 2008 +0100
+++ b/TextBox.st Sun Oct 26 21:10:23 2008 +0100
@@ -186,6 +186,12 @@
|wWanted hWanted wPanel|
+ "/ If I have an explicit preferredExtent..
+ explicitExtent notNil ifTrue:[
+ ^ explicitExtent
+ ].
+
+ "/ If I have a cached preferredExtent value..
preferredExtent notNil ifTrue:[
^ preferredExtent
].
@@ -210,5 +216,5 @@
!TextBox class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/TextBox.st,v 1.19 2008-05-30 12:24:36 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/TextBox.st,v 1.20 2008-10-26 20:10:23 stefan Exp $'
! !