# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1529023241 -7200
# Node ID 70bb01fb182812d9984a99aa3ae16df1900de29e
# Parent  8129c8bd9783412225e428465f7525b926bb4aaf
#OTHER by cg
drag and drop confusion fixed
(Logical vs. Device coordinates)

diff -r 8129c8bd9783 -r 70bb01fb1828 Tools__MethodCategoryList.st
--- a/Tools__MethodCategoryList.st	Fri Jun 15 02:40:36 2018 +0200
+++ b/Tools__MethodCategoryList.st	Fri Jun 15 02:40:41 2018 +0200
@@ -862,7 +862,7 @@
 categoryAtTargetPointOf:aDropContext
     |p methodListView lineNr cat|
 
-    p := aDropContext targetPoint.
+    p := aDropContext targetPointInDeviceCoordinates.
 
     methodListView := aDropContext targetWidget.
 
@@ -874,6 +874,8 @@
     cat = self class nameListEntryForALL ifTrue:[^ nil].
 
     ^ cat
+
+    "Modified: / 15-06-2018 / 02:27:05 / Claus Gittinger"
 !
 
 doDropContext:aDropContext