#OTHER by cg expecco_18_1_0 expecco_18_1_0wa1
authorClaus Gittinger <cg@exept.de>
Fri, 15 Jun 2018 02:40:48 +0200
changeset 3566278888b1ca84
parent 3565 16978aaed2f6
child 3568 5004640f2a10
#OTHER by cg
drag and drop confusion fixed
(Logical vs. Device coordinates)
MenuEditor.st
     1.1 --- a/MenuEditor.st	Thu Jun 14 17:17:32 2018 +0200
     1.2 +++ b/MenuEditor.st	Fri Jun 15 02:40:48 2018 +0200
     1.3 @@ -1,3 +1,5 @@
     1.4 +"{ Encoding: utf8 }"
     1.5 +
     1.6  "
     1.7   COPYRIGHT (c) 1997 by eXept Software AG
     1.8  	      All Rights Reserved
     1.9 @@ -2195,16 +2197,16 @@
    1.10  
    1.11      dropOverLine isNil ifTrue:[^ self ].       "/ context not valid to me ...
    1.12  
    1.13 -    lnNr := listOfItemsView yVisibleToLineNr:(aDropContext targetPoint y).
    1.14 +    lnNr := listOfItemsView yVisibleToLineNr:(aDropContext targetPointInDeviceCoordinates y).
    1.15      item := nil.
    1.16  
    1.17      lnNr notNil ifTrue:[
    1.18 -	item := listOfItems at:lnNr ifAbsent:nil.
    1.19 -	item notNil ifTrue:[
    1.20 -	    (item isAction and:[item hasDelayedMenu]) ifTrue:[
    1.21 -		item := nil
    1.22 -	    ]
    1.23 -	]
    1.24 +        item := listOfItems at:lnNr ifAbsent:nil.
    1.25 +        item notNil ifTrue:[
    1.26 +            (item isAction and:[item hasDelayedMenu]) ifTrue:[
    1.27 +                item := nil
    1.28 +            ]
    1.29 +        ]
    1.30      ].
    1.31      item isNil ifTrue:[ lnNr := 0 ].   "/ not dropable for item
    1.32  
    1.33 @@ -2212,6 +2214,7 @@
    1.34      self changeDropLineTo:lnNr in:aDropContext.
    1.35  
    1.36      "Modified: / 29-11-2011 / 11:28:17 / cg"
    1.37 +    "Modified: / 15-06-2018 / 02:27:44 / Claus Gittinger"
    1.38  ! !
    1.39  
    1.40  !MenuEditor methodsFor:'event processing'!