equal
deleted
inserted
replaced
|
1 "{ Encoding: utf8 }" |
|
2 |
1 " |
3 " |
2 COPYRIGHT (c) 1997 by eXept Software AG |
4 COPYRIGHT (c) 1997 by eXept Software AG |
3 All Rights Reserved |
5 All Rights Reserved |
4 |
6 |
5 This software is furnished under a license and may be used |
7 This software is furnished under a license and may be used |
2193 |
2195 |
2194 |lnNr item| |
2196 |lnNr item| |
2195 |
2197 |
2196 dropOverLine isNil ifTrue:[^ self ]. "/ context not valid to me ... |
2198 dropOverLine isNil ifTrue:[^ self ]. "/ context not valid to me ... |
2197 |
2199 |
2198 lnNr := listOfItemsView yVisibleToLineNr:(aDropContext targetPoint y). |
2200 lnNr := listOfItemsView yVisibleToLineNr:(aDropContext targetPointInDeviceCoordinates y). |
2199 item := nil. |
2201 item := nil. |
2200 |
2202 |
2201 lnNr notNil ifTrue:[ |
2203 lnNr notNil ifTrue:[ |
2202 item := listOfItems at:lnNr ifAbsent:nil. |
2204 item := listOfItems at:lnNr ifAbsent:nil. |
2203 item notNil ifTrue:[ |
2205 item notNil ifTrue:[ |
2204 (item isAction and:[item hasDelayedMenu]) ifTrue:[ |
2206 (item isAction and:[item hasDelayedMenu]) ifTrue:[ |
2205 item := nil |
2207 item := nil |
2206 ] |
2208 ] |
2207 ] |
2209 ] |
2208 ]. |
2210 ]. |
2209 item isNil ifTrue:[ lnNr := 0 ]. "/ not dropable for item |
2211 item isNil ifTrue:[ lnNr := 0 ]. "/ not dropable for item |
2210 |
2212 |
2211 "/ redraw drop indication |
2213 "/ redraw drop indication |
2212 self changeDropLineTo:lnNr in:aDropContext. |
2214 self changeDropLineTo:lnNr in:aDropContext. |
2213 |
2215 |
2214 "Modified: / 29-11-2011 / 11:28:17 / cg" |
2216 "Modified: / 29-11-2011 / 11:28:17 / cg" |
|
2217 "Modified: / 15-06-2018 / 02:27:44 / Claus Gittinger" |
2215 ! ! |
2218 ! ! |
2216 |
2219 |
2217 !MenuEditor methodsFor:'event processing'! |
2220 !MenuEditor methodsFor:'event processing'! |
2218 |
2221 |
2219 processEvent:anEvent |
2222 processEvent:anEvent |