--- 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