--- a/PanelView.st Fri Nov 14 14:06:50 2008 +0100
+++ b/PanelView.st Mon Nov 17 18:33:02 2008 +0100
@@ -544,14 +544,14 @@
|subViews|
subViews := self subViews.
- subViews size ~~ 0 ifTrue:[
- ignoreInvisibleComponents ifTrue:[
- subViews := subViews
- select:[:v | realized
- ifTrue:[v realized]
- ifFalse:[v isHiddenOnRealize not]
- ].
- ].
+ ignoreInvisibleComponents ifTrue:[
+ subViews size ~~ 0 ifTrue:[
+ subViews := subViews
+ select:[:v | realized
+ ifTrue:[v realized]
+ ifFalse:[v isHiddenOnRealize not]
+ ].
+ ].
].
^ subViews
@@ -561,5 +561,5 @@
!PanelView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/PanelView.st,v 1.39 2007-10-09 08:44:03 ca Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/PanelView.st,v 1.40 2008-11-17 17:33:02 cg Exp $'
! !