# HG changeset patch
# User werner
# Date 1081353391 -7200
# Node ID 6ad211a201cfda8732dcedaa670f4002fcbe3a45
# Parent  ba152306fbf5ca24a26e5c747e230af2c6d6d486
*** empty log message ***

diff -r ba152306fbf5 -r 6ad211a201cf UIObjectView.st
--- a/UIObjectView.st	Wed Apr 07 16:33:10 2004 +0200
+++ b/UIObjectView.st	Wed Apr 07 17:56:31 2004 +0200
@@ -468,6 +468,9 @@
 
 !UIObjectView methodsFor:'event handling'!
 
+doublePressed:pressPoint
+!
+
 elementChangedSize:aView
     "some element has changed its size; collect them during selectionHiddenLevel 
      is on
diff -r ba152306fbf5 -r 6ad211a201cf UIPainterView.st
--- a/UIPainterView.st	Wed Apr 07 16:33:10 2004 +0200
+++ b/UIPainterView.st	Wed Apr 07 17:56:31 2004 +0200
@@ -555,8 +555,9 @@
 !
 
 drop:anObjectOrCollection at:aPoint
-    |spec newSel oldSel dragOffset widg|
-
+    |spec newSel oldSel dragOffset widg doit|
+
+    doit := true.
     self selection notNil ifTrue:[
         oldSel := self singleSelection.
 
@@ -572,10 +573,12 @@
         self setSelection:widg withRedraw:true.
     ].
     spec := (anObjectOrCollection at:1) theObject.
-    dragOffset := DragAndDropManager dragOffsetQuerySignal query.
-    newSel := self pasteSpecifications:spec keepLayout:false at:aPoint - dragOffset.
-
-    self select:(oldSel ? newSel)
+    doit ifTrue:[
+        dragOffset := DragAndDropManager dragOffsetQuerySignal query.
+        newSel := self pasteSpecifications:spec keepLayout:false at:aPoint - dragOffset.
+
+        self select:(oldSel ? newSel)
+    ].
 
     "Modified: / 18.3.1999 / 18:29:43 / stefan"
     "Modified: / 30.10.2001 / 14:02:35 / cg"