equal
deleted
inserted
replaced
3893 |
3893 |
3894 wasSelected := (selection == item). |
3894 wasSelected := (selection == item). |
3895 wasSelected ifFalse:[ |
3895 wasSelected ifFalse:[ |
3896 self selection:item openMenu:true. |
3896 self selection:item openMenu:true. |
3897 "/ make sure that a momentary press is visible |
3897 "/ make sure that a momentary press is visible |
3898 self repairDamage. |
3898 item hasIndication ifFalse:[ |
3899 Delay waitForSeconds:0.1. |
3899 self repairDamage. |
|
3900 Delay waitForSeconds:0.1. |
|
3901 ]. |
3900 ]. |
3902 ]. |
3901 item hasDelayedMenu ifTrue:[ |
3903 item hasDelayedMenu ifTrue:[ |
3902 "/ clicked on the arrow icon ? |
3904 "/ clicked on the arrow icon ? |
3903 (item menuIndicatorContains:aPoint) ifTrue:[ |
3905 (item menuIndicatorContains:aPoint) ifTrue:[ |
3904 self selection:item openMenu:false. |
3906 self selection:item openMenu:false. |
3925 Delay waitForSeconds:0.1. |
3927 Delay waitForSeconds:0.1. |
3926 ]. |
3928 ]. |
3927 self sensor flushUserEvents. |
3929 self sensor flushUserEvents. |
3928 self selection:nil. |
3930 self selection:nil. |
3929 |
3931 |
3930 "Created: / 13.11.2001 / 14:12:04 / cg" |
3932 "Created: / 13-11-2001 / 14:12:04 / cg" |
3931 "Modified: / 13.11.2001 / 19:50:52 / cg" |
3933 "Modified: / 20-11-2016 / 13:13:46 / cg" |
3932 ! |
3934 ! |
3933 |
3935 |
3934 handleCursorKey:aKey |
3936 handleCursorKey:aKey |
3935 "handle a cursor key" |
3937 "handle a cursor key" |
3936 |
3938 |