--- a/DragAndDropManager.st	Mon Jul 18 09:35:38 2011 +0200
+++ b/DragAndDropManager.st	Mon Jul 18 09:38:29 2011 +0200
@@ -1078,7 +1078,7 @@
 
     |handler numArgs dragBlock dobjs|
 
-    dragOffset := offs ? (Point x:0 y:0).
+    dragOffset := offs ? (0@0).
     numArgs    := aDragBlock numArgs.
 
     numArgs == 3 ifTrue:[
@@ -1098,6 +1098,8 @@
         handler := DragHandler startOpaqueDrag:dragBlock extent:anExtent offset:dragOffset.
     ].
     self doStart:handler for:aView atEnd:aFourArgEndBlock.
+
+    "Modified: / 18-07-2011 / 09:38:21 / cg"
 ! !
 
 !DragAndDropManager methodsFor:'dragging-lines'!
@@ -1714,11 +1716,11 @@
 !DragAndDropManager class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/DragAndDropManager.st,v 1.89 2010-03-02 10:26:40 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/DragAndDropManager.st,v 1.90 2011-07-18 07:38:29 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview2/DragAndDropManager.st,v 1.89 2010-03-02 10:26:40 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/DragAndDropManager.st,v 1.90 2011-07-18 07:38:29 cg Exp $'
 ! !
 
 DragAndDropManager initialize!