# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1529023248 -7200
# Node ID 278888b1ca84053b17b6cd98657e1f849ed5606a
# Parent  16978aaed2f62240bd454572ed7469ec045475bf
#OTHER by cg
drag and drop confusion fixed
(Logical vs. Device coordinates)

diff -r 16978aaed2f6 -r 278888b1ca84 MenuEditor.st
--- a/MenuEditor.st	Thu Jun 14 17:17:32 2018 +0200
+++ b/MenuEditor.st	Fri Jun 15 02:40:48 2018 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1997 by eXept Software AG
 	      All Rights Reserved
@@ -2195,16 +2197,16 @@
 
     dropOverLine isNil ifTrue:[^ self ].       "/ context not valid to me ...
 
-    lnNr := listOfItemsView yVisibleToLineNr:(aDropContext targetPoint y).
+    lnNr := listOfItemsView yVisibleToLineNr:(aDropContext targetPointInDeviceCoordinates y).
     item := nil.
 
     lnNr notNil ifTrue:[
-	item := listOfItems at:lnNr ifAbsent:nil.
-	item notNil ifTrue:[
-	    (item isAction and:[item hasDelayedMenu]) ifTrue:[
-		item := nil
-	    ]
-	]
+        item := listOfItems at:lnNr ifAbsent:nil.
+        item notNil ifTrue:[
+            (item isAction and:[item hasDelayedMenu]) ifTrue:[
+                item := nil
+            ]
+        ]
     ].
     item isNil ifTrue:[ lnNr := 0 ].   "/ not dropable for item
 
@@ -2212,6 +2214,7 @@
     self changeDropLineTo:lnNr in:aDropContext.
 
     "Modified: / 29-11-2011 / 11:28:17 / cg"
+    "Modified: / 15-06-2018 / 02:27:44 / Claus Gittinger"
 ! !
 
 !MenuEditor methodsFor:'event processing'!