equal
deleted
inserted
replaced
3655 ! ! |
3655 ! ! |
3656 |
3656 |
3657 !MenuEditor::Item methodsFor:'queries-editor'! |
3657 !MenuEditor::Item methodsFor:'queries-editor'! |
3658 |
3658 |
3659 actionSelectors |
3659 actionSelectors |
3660 "returns my action selectors |
3660 "return my action selectors" |
3661 " |
3661 |
3662 |value| |
3662 |value| |
3663 |
3663 |
3664 value := menuItem value. |
3664 value := menuItem value. |
3665 value isSymbol ifTrue:[ ^ Array with:value ]. |
3665 value isSymbol ifTrue:[ ^ Array with:value ]. |
3666 ^ #() |
3666 ^ #() |
3667 ! |
3667 ! |
3668 |
3668 |
3669 aspectSelectors |
3669 aspectSelectors |
3670 "returns my aspect selectors |
3670 "return my aspect selectors" |
3671 " |
3671 |
3672 |aspects| |
3672 |aspects| |
3673 |
3673 |
3674 aspects := OrderedCollection new. |
3674 aspects := OrderedCollection new. |
3675 |
3675 |
3676 #( indication choice enabled isVisible ) do:[:aKey| |sel| |
3676 #( indication choice enabled isVisible ) do:[:aKey| |sel| |
3677 sel := menuItem perform:aKey. |
3677 sel := menuItem perform:aKey. |
3678 sel isSymbol ifTrue:[ aspects add:sel ] |
3678 sel isSymbol ifTrue:[ aspects add:sel ] |
3679 ]. |
3679 ]. |
3680 ^ aspects |
3680 ^ aspects |
3681 ! ! |
3681 ! ! |
3682 |
3682 |
3683 !MenuEditor::Item methodsFor:'queries-operation'! |
3683 !MenuEditor::Item methodsFor:'queries-operation'! |
5576 ! ! |
5576 ! ! |
5577 |
5577 |
5578 !MenuEditor::RootItem methodsFor:'queries-editor'! |
5578 !MenuEditor::RootItem methodsFor:'queries-editor'! |
5579 |
5579 |
5580 actionSelectors |
5580 actionSelectors |
5581 "returns my action selectors |
5581 "return my action selectors" |
5582 " |
5582 |
5583 ^ #() |
5583 ^ #() |
5584 ! |
5584 ! |
5585 |
5585 |
5586 aspectSelectors |
5586 aspectSelectors |
5587 "returns my aspect selectors |
5587 "returns my aspect selectors |