UIObjectView.st
changeset 2368 99f14af1d5ec
parent 2364 121c79884983
child 2394 664ca922a80a
--- a/UIObjectView.st	Mon Jun 23 19:25:57 2008 +0200
+++ b/UIObjectView.st	Mon Jun 23 19:37:51 2008 +0200
@@ -896,11 +896,16 @@
     ].
 
     clickedView := self findObjectAt:aPoint.
-    (clickedView notNil 
-    and:[clickedView isComponentOf:selectedView]) ifTrue:[
-        self unselect.
-        selectedView := nil.    
-        viewOperatedUpon := nil
+    clickedView notNil ifTrue:[
+        (clickedView isComponentOf:selectedView) ifTrue:[
+            self unselect.
+            selectedView := nil.    
+            viewOperatedUpon := nil
+        ] ifFalse:[
+            self unselect.
+            selectedView := nil.    
+            viewOperatedUpon := clickedView
+        ].
     ].
 
     viewOperatedUpon isNil ifTrue:[