# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1201285898 -3600
# Node ID 4cca07c42e74dade8cda4d87ccd75113ce80e29a
# Parent  06ada9ab1a8a2dc4a4e04d1a43a844eee3e6d80c
code beautification

diff -r 06ada9ab1a8a -r 4cca07c42e74 UIObjectView.st
--- 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
             ].