DragAndDropManager.st
changeset 1749 1f58fbcd4b96
parent 1718 7da6bd953eb9
child 1776 79372ca563fc
--- a/DragAndDropManager.st	Fri Apr 11 02:10:02 2003 +0200
+++ b/DragAndDropManager.st	Tue Apr 15 13:57:43 2003 +0200
@@ -1351,7 +1351,7 @@
 doStart:aHandler for:aView atEnd:aFourArgEndBlock
     "setup a handler and a restore block
     "
-    |device sensor lastActive windowGroup savedCursor screenPoint|
+    |device lastActive windowGroup savedCursor screenPoint|
 
     device := aView device.
     lastActive := ActiveDragAndDropManagers at:device ifAbsent:nil.
@@ -1394,10 +1394,8 @@
     aHandler preDraggingIn:dragView.
 
     "/ must wait for all pending motion events to arrive, and ignore them
-    (sensor := dragView sensor) notNil ifTrue:[
-        device sync.        
-        sensor flushMotionEventsFor:nil.
-    ].
+    device sync.        
+    dragView sensor flushMotionEventsFor:nil.
 
     "/ start with a first draw at the current mouse position
     screenPoint := device pointerPosition.
@@ -1427,7 +1425,7 @@
 !DragAndDropManager class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/DragAndDropManager.st,v 1.49 2003-03-19 10:06:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/DragAndDropManager.st,v 1.50 2003-04-15 11:57:43 stefan Exp $'
 ! !
 
 DragAndDropManager initialize!