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