--- a/DragAndDropManager.st Fri Oct 13 17:45:19 2006 +0200
+++ b/DragAndDropManager.st Fri Oct 13 17:57:55 2006 +0200
@@ -1387,7 +1387,9 @@
DragContextQuerySignal answer:aContext do:[
DragOriginatorQuerySignal answer:dragView do:[
- DragOffsetQuerySignal answer:dragOffset do:[ |targetWidget targetPoint|
+ DragOffsetQuerySignal answer:dragOffset do:[
+ |targetWidget targetPoint|
+
targetWidget := aContext targetWidget.
targetPoint := aContext targetPoint.
@@ -1411,7 +1413,7 @@
].
].
- "Modified: / 13-10-2006 / 16:10:56 / cg"
+ "Modified: / 13-10-2006 / 17:52:56 / cg"
!
doFindDropTargetIn:aView at:aPoint
@@ -1446,13 +1448,15 @@
view := aView.
dobj := dropContext dropObjects.
[
- (view canDrop:dobj) ifTrue:[
+ (view canDrop:dropContext "dobj") ifTrue:[
^ DropTarget receiver:self argument:view dropSelector:#doDrop:in:.
].
(view := view superView) notNil
] whileTrue.
].
^ nil
+
+ "Modified: / 13-10-2006 / 17:50:32 / cg"
!
doStart:aHandler for:aView atEnd:aFourArgEndBlock
@@ -1566,7 +1570,7 @@
!DragAndDropManager class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview2/DragAndDropManager.st,v 1.71 2006-10-13 15:45:19 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/DragAndDropManager.st,v 1.72 2006-10-13 15:57:55 cg Exp $'
! !
DragAndDropManager initialize!