--- a/DragAndDropManager.st Tue Apr 22 18:16:52 2008 +0200
+++ b/DragAndDropManager.st Tue Apr 22 18:46:24 2008 +0200
@@ -756,7 +756,7 @@
buttonMotion:button x:x y:y view:aView
|device screenPoint oldWidget oldId oldPoint newId newWidget oldTarget newTarget
- isDroppable cursor targetPoint|
+ isDroppable cursor|
self isDisabled ifTrue: [ ^ self ].
@@ -780,7 +780,6 @@
newId := device viewIdFromPoint:screenPoint.
newWidget := device viewFromId:newId.
- targetPoint := self class translatePointFromScreen:screenPoint to:newWidget.
dropContext rootPoint:screenPoint.
dropContext targetWidget:newWidget id:newId.
@@ -1638,7 +1637,7 @@
!DragAndDropManager class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview2/DragAndDropManager.st,v 1.79 2008-04-22 16:16:43 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/DragAndDropManager.st,v 1.80 2008-04-22 16:46:24 cg Exp $'
! !
DragAndDropManager initialize!