DragAndDropManager.st
changeset 3302 b6d6a1db9a79
parent 3115 a675e9962acc
child 3344 724213c53326
--- a/DragAndDropManager.st	Wed Mar 05 23:13:03 2014 +0100
+++ b/DragAndDropManager.st	Thu Mar 06 12:09:04 2014 +0100
@@ -823,13 +823,14 @@
 passiveAction:aBlockOrNil
     self removePassiveAction.
     aBlockOrNil notNil ifTrue:[
-        passiveAction := Processor addTimedBlock:aBlockOrNil afterMilliseconds:100
+        passiveAction := aBlockOrNil.
+        Processor addTimedBlock:aBlockOrNil afterMilliseconds:100.
     ].
 !
 
 removePassiveAction
     passiveAction notNil ifTrue:[
-        Processor removeTimeoutWithID:passiveAction.
+        Processor removeTimedBlock:passiveAction.
         passiveAction := nil.
     ].
 !
@@ -1719,11 +1720,11 @@
 !DragAndDropManager class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/DragAndDropManager.st,v 1.91 2013-04-19 09:38:12 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/DragAndDropManager.st,v 1.92 2014-03-06 11:09:04 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview2/DragAndDropManager.st,v 1.91 2013-04-19 09:38:12 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/DragAndDropManager.st,v 1.92 2014-03-06 11:09:04 stefan Exp $'
 ! !