author | Claus Gittinger <cg@exept.de> |
Tue, 04 Jun 2013 12:31:15 +0200 | |
changeset 3011 | ceaec66469ff |
parent 3010 | 12d3f7411fb6 |
child 3012 | 27eb0659e5f0 |
UIObjectView.st | file | annotate | diff | comparison | revisions |
--- a/UIObjectView.st Tue Jun 04 11:40:48 2013 +0200 +++ b/UIObjectView.st Tue Jun 04 12:31:15 2013 +0200 @@ -746,10 +746,7 @@ setOfViews notNil ifTrue:[^ Array with:setOfViews]. ^ nil ]. - ^ setOfViews - select:[:aView| - (setOfViews contains:[:v | aView isComponentOf:v]) not - ] + ^ setOfViews reject:[:aView| (setOfViews contains:[:v | aView isComponentOf:v]) ] ! redrawObjectsInVisible:redrawFrame @@ -3233,3 +3230,4 @@ version_CVS ^ '$Header$' ! ! +