# HG changeset patch # User Claus Gittinger # Date 1242641410 -7200 # Node ID 73efe0a84f4bcc8ef0d2cd2cfeaf842c27b3ee93 # Parent 07c7e9ba97eef659989c9b6e5b793c5a3bce7bf2 no need to unselect/select in startSelectOrMove (avoid flicker) diff -r 07c7e9ba97ee -r 73efe0a84f4b UIObjectView.st --- a/UIObjectView.st Thu May 14 23:47:16 2009 +0200 +++ b/UIObjectView.st Mon May 18 12:10:10 2009 +0200 @@ -907,11 +907,11 @@ clickedView := self findObjectAt:aPoint. clickedView notNil ifTrue:[ (clickedView isComponentOf:selectedView) ifTrue:[ - self unselect. + "/ self unselect. selectedView := nil. viewOperatedUpon := nil ] ifFalse:[ - self unselect. + "/ self unselect. selectedView := nil. viewOperatedUpon := clickedView ]. @@ -1839,27 +1839,7 @@ self transaction:#pasteHeight dimensionDo:[:v| self resize:v bottom:(v computeOrigin + heightToPaste) ]. - ^ self. ]. - - - - - - - - - - - - - - - - - - - ! pasteLayout