# HG changeset patch # User Claus Gittinger # Date 1242647861 -7200 # Node ID 961e4b0805715a30f9e7c56903afd8ee774c929c # Parent b717cb2e0cb8f8d587c40a101886e50ab1e5e6f1 handles when resizing diff -r b717cb2e0cb8 -r 961e4b080571 UIObjectView.st --- a/UIObjectView.st Mon May 18 12:12:16 2009 +0200 +++ b/UIObjectView.st Mon May 18 13:57:41 2009 +0200 @@ -1001,12 +1001,21 @@ endResize "cleanup after object resize " - |object| + |object savedSelection| object := resizeData object. resizeData := nil. self invertOutlineOf:object. + + "/ temporarily hide the selection, in order to allow the container to move the + "/ element around... + savedSelection := selection. + self selection:nil. + "/ handle any expose events (for subcomponents) before + "/ redrawing the handles. + self windowGroup processExposeEvents. + self setDefaultActions. self elementChangedSize:object. @@ -1017,11 +1026,13 @@ self windowGroup processExposeEvents ]. - self setSelection:object withRedraw:true. - self forEach:self selection do:[:aView | + self forEach:savedSelection do:[:aView | self recomputeShapeIfTransparentBox:aView. ]. self layoutChanged. + + self selection:savedSelection. + self setSelection:object withRedraw:true. ! layoutChanged