--- a/OptionBox.st Sun Oct 26 21:10:55 2008 +0100
+++ b/OptionBox.st Sun Oct 26 21:11:18 2008 +0100
@@ -645,8 +645,12 @@
|w w1 h buttonPanelsPref vPanelsPref mm|
- "/ 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
].
@@ -673,5 +677,5 @@
!OptionBox class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/OptionBox.st,v 1.66 2008-10-24 13:14:37 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/OptionBox.st,v 1.67 2008-10-26 20:11:18 stefan Exp $'
! !