--- a/FramedBox.st Sun Oct 26 21:08:36 2008 +0100
+++ b/FramedBox.st Sun Oct 26 21:09:17 2008 +0100
@@ -700,8 +700,12 @@
|m2 sep|
- "/ If I have an explicit preferredExtent ..
+ "/ If I have an explicit preferredExtent..
+ explicitExtent notNil ifTrue:[
+ ^ explicitExtent
+ ].
+ "/ If I have a cached preferredExtent value..
preferredExtent notNil ifTrue:[
^ preferredExtent
].
@@ -761,5 +765,5 @@
!FramedBox class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/FramedBox.st,v 1.49 2008-07-18 09:42:15 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/FramedBox.st,v 1.50 2008-10-26 20:09:17 stefan Exp $'
! !