DragAndDropManager.st
changeset 1162 0539b64679ce
parent 1072 be90bc383d83
child 1166 4892defb2ab6
--- a/DragAndDropManager.st	Fri Apr 16 16:18:19 1999 +0200
+++ b/DragAndDropManager.st	Fri Apr 16 16:18:58 1999 +0200
@@ -1253,6 +1253,8 @@
     delegate   := aView delegate.
     handler    := aHandler.
 
+    dropContext dragHandler:aHandler.
+
     restoreBlock := [
         aHandler postDragging.
         aView delegate:delegate.
@@ -1293,6 +1295,6 @@
 !DragAndDropManager class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/DragAndDropManager.st,v 1.21 1998-09-12 13:40:19 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/DragAndDropManager.st,v 1.22 1999-04-16 14:18:58 cg Exp $'
 ! !
 DragAndDropManager initialize!