--- a/UIObjectView.st	Fri Jan 25 10:28:43 2008 +0100
+++ b/UIObjectView.st	Fri Jan 25 19:31:38 2008 +0100
@@ -724,7 +724,12 @@
     ].
 !
 
-minSetOfSuperViews:setOfViews
+minClosedViewSetFor:setOfViews
+    "return the minimum closure for a given set of view;
+     That is the minimum set of views which contains the given set of views.
+     Concrete: all subviews from setOfViews of which any superView is already in the set
+               is excluded from the result"
+
     setOfViews isCollection ifFalse:[
         setOfViews notNil ifTrue:[^ Array with:setOfViews].
         ^ nil
@@ -1343,7 +1348,7 @@
     aBlock ensure:[
         selectionHiddenLevel == 1 ifTrue:[
             setOfSuperViewsSizeChanged notEmpty ifTrue:[
-                coll := self minSetOfSuperViews:setOfSuperViewsSizeChanged.
+                coll := self minClosedViewSetFor:setOfSuperViewsSizeChanged.
                 coll do:[:aView| aView sizeChanged:nil].
                 setOfSuperViewsSizeChanged := IdentitySet new
             ].