--- a/WGroup.st Fri Jan 17 00:17:10 1997 +0100
+++ b/WGroup.st Fri Jan 17 16:44:47 1997 +0100
@@ -740,7 +740,7 @@
allNonTopViewsDo:aBlock
"evaluate aBlock for all nonTopviews (i.e. subviews) in this group.
This works on a copy of the view collection, to allow for
- destroy and other collection changing operations to be done."
+ destroy and other collection changing operations to be performed in the loop."
views notNil ifTrue:[
views copy nonNilElementsDo:aBlock
@@ -750,7 +750,7 @@
allTopViewsDo:aBlock
"evaluate aBlock for all topviews in this group.
This works on a copy of the view collection, to allow for
- destroy and other collection changing operations to be done."
+ destroy and other collection changing operations to be performed in the loop."
topViews notNil ifTrue:[
topViews copy nonNilElementsDo:aBlock
@@ -760,7 +760,7 @@
allTopViewsExcept:aView do:aBlock
"evaluate aBlock for all topviews except aView in this group.
This works on a copy of the view collection, to allow for
- destroy and other collection changing operations to be done."
+ destroy and other collection changing operations to be performed in the loop."
topViews notNil ifTrue:[
topViews copy nonNilElementsDo:[:v |
@@ -772,7 +772,7 @@
allViewsDo:aBlock
"evaluate aBlock for all views & topviews in this group.
This works on a copy of the view collection, to allow for
- destroy and other collection changing operations to be done."
+ destroy and other collection changing operations to be performed in the loop."
self allTopViewsDo:aBlock.
self allNonTopViewsDo:aBlock.
@@ -781,7 +781,7 @@
partnersDo:aBlock
"evaluate aBlock for all partnerViews.
This works on a copy of the view collection, to allow for
- destroy and other collection changing operations to be done."
+ destroy and other collection changing operations to be performed in the loop."
topViews notNil ifTrue:[
topViews copy nonNilElementsDo:[:v |
@@ -793,7 +793,7 @@
slavesDo:aBlock
"evaluate aBlock for all slaveViews.
This works on a copy of the view collection, to allow for
- destroy and other collection changing operations to be done."
+ destroy and other collection changing operations to be performed in the loop."
topViews notNil ifTrue:[
topViews copy nonNilElementsDo:[:v |
@@ -1465,6 +1465,6 @@
!WindowGroup class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview/Attic/WGroup.st,v 1.95 1997-01-12 00:09:05 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview/Attic/WGroup.st,v 1.96 1997-01-17 15:44:47 cg Exp $'
! !
WindowGroup initialize!
--- a/WindowGroup.st Fri Jan 17 00:17:10 1997 +0100
+++ b/WindowGroup.st Fri Jan 17 16:44:47 1997 +0100
@@ -740,7 +740,7 @@
allNonTopViewsDo:aBlock
"evaluate aBlock for all nonTopviews (i.e. subviews) in this group.
This works on a copy of the view collection, to allow for
- destroy and other collection changing operations to be done."
+ destroy and other collection changing operations to be performed in the loop."
views notNil ifTrue:[
views copy nonNilElementsDo:aBlock
@@ -750,7 +750,7 @@
allTopViewsDo:aBlock
"evaluate aBlock for all topviews in this group.
This works on a copy of the view collection, to allow for
- destroy and other collection changing operations to be done."
+ destroy and other collection changing operations to be performed in the loop."
topViews notNil ifTrue:[
topViews copy nonNilElementsDo:aBlock
@@ -760,7 +760,7 @@
allTopViewsExcept:aView do:aBlock
"evaluate aBlock for all topviews except aView in this group.
This works on a copy of the view collection, to allow for
- destroy and other collection changing operations to be done."
+ destroy and other collection changing operations to be performed in the loop."
topViews notNil ifTrue:[
topViews copy nonNilElementsDo:[:v |
@@ -772,7 +772,7 @@
allViewsDo:aBlock
"evaluate aBlock for all views & topviews in this group.
This works on a copy of the view collection, to allow for
- destroy and other collection changing operations to be done."
+ destroy and other collection changing operations to be performed in the loop."
self allTopViewsDo:aBlock.
self allNonTopViewsDo:aBlock.
@@ -781,7 +781,7 @@
partnersDo:aBlock
"evaluate aBlock for all partnerViews.
This works on a copy of the view collection, to allow for
- destroy and other collection changing operations to be done."
+ destroy and other collection changing operations to be performed in the loop."
topViews notNil ifTrue:[
topViews copy nonNilElementsDo:[:v |
@@ -793,7 +793,7 @@
slavesDo:aBlock
"evaluate aBlock for all slaveViews.
This works on a copy of the view collection, to allow for
- destroy and other collection changing operations to be done."
+ destroy and other collection changing operations to be performed in the loop."
topViews notNil ifTrue:[
topViews copy nonNilElementsDo:[:v |
@@ -1465,6 +1465,6 @@
!WindowGroup class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview/WindowGroup.st,v 1.95 1997-01-12 00:09:05 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview/WindowGroup.st,v 1.96 1997-01-17 15:44:47 cg Exp $'
! !
WindowGroup initialize!