--- a/Separator.st Sun Oct 26 21:12:17 2008 +0100
+++ b/Separator.st Sun Oct 26 21:12:31 2008 +0100
@@ -228,7 +228,15 @@
preferredExtent
|e|
- preferredExtent notNil ifTrue:[^ preferredExtent].
+ "/ If I have an explicit preferredExtent..
+ explicitExtent notNil ifTrue:[
+ ^ explicitExtent
+ ].
+
+ "/ If I have a cached preferredExtent value..
+ preferredExtent notNil ifTrue:[
+ ^ preferredExtent
+ ].
e := super preferredExtent.
orientation == #horizontal ifTrue:[
@@ -251,5 +259,5 @@
!Separator class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/Separator.st,v 1.21 2007-11-28 14:07:15 ca Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/Separator.st,v 1.22 2008-10-26 20:12:31 stefan Exp $'
! !