--- a/Tools__ProjectList.st	Fri Jun 15 02:40:34 2018 +0200
+++ b/Tools__ProjectList.st	Fri Jun 15 02:40:36 2018 +0200
@@ -507,7 +507,7 @@
     |p packageListView lineNr item package dropInfo now 
      overItem timeOverItem|
 
-    p := aDropContext targetPoint.
+    p := aDropContext targetPointInDeviceCoordinates.
 
     packageListView := aDropContext targetWidget.
 
@@ -545,6 +545,7 @@
     ^ package.
 
     "Modified: / 18-11-2006 / 16:13:47 / cg"
+    "Modified: / 15-06-2018 / 02:27:13 / Claus Gittinger"
 ! !
 
 !ProjectList methodsFor:'generators'!