--- a/VerticalPanelView.st Sun Oct 26 21:14:57 2008 +0100
+++ b/VerticalPanelView.st Sun Oct 26 21:15:50 2008 +0100
@@ -1024,8 +1024,12 @@
|sumOfHeights maxWidth maxHeight m2 subViews|
- "/ 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
].
@@ -1101,5 +1105,5 @@
!VerticalPanelView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/VerticalPanelView.st,v 1.46 2008-07-22 14:15:08 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/VerticalPanelView.st,v 1.47 2008-10-26 20:15:50 stefan Exp $'
! !