equal
deleted
inserted
replaced
3277 aspectAt:aKey put:aValue |
3277 aspectAt:aKey put:aValue |
3278 "set a specific aspect named aKey to the aValue |
3278 "set a specific aspect named aKey to the aValue |
3279 " |
3279 " |
3280 aKey == #rawLabel ifTrue:[ ^ self rawLabel:aValue ]. |
3280 aKey == #rawLabel ifTrue:[ ^ self rawLabel:aValue ]. |
3281 aKey == #submenuChannel ifTrue:[ ^ self ]. |
3281 aKey == #submenuChannel ifTrue:[ ^ self ]. |
3282 |
|
3283 menuItem perform:((aKey, ':') asSymbol) with:aValue. |
3282 menuItem perform:((aKey, ':') asSymbol) with:aValue. |
3284 ! |
3283 ! |
3285 |
3284 |
3286 fromAspects:aspects |
3285 fromAspects:aspects |
3287 "read values from aspects |
3286 "read values from aspects |
4157 |
4156 |
4158 menuItem rawLabel:'Delayed'. |
4157 menuItem rawLabel:'Delayed'. |
4159 |
4158 |
4160 menuItem submenuChannel:(self validateValue:(anItem submenuChannel)). |
4159 menuItem submenuChannel:(self validateValue:(anItem submenuChannel)). |
4161 menuItem horizontalLayout:(self validateValue:(anItem horizontalLayout)). |
4160 menuItem horizontalLayout:(self validateValue:(anItem horizontalLayout)). |
4162 menuItem horizontalLayout:(self validateValue:(anItem keepLinkedMenu)). |
4161 menuItem keepLinkedMenu:(self validateValue:(anItem keepLinkedMenu)). |
4163 ! |
4162 ! |
4164 |
4163 |
4165 setDelayedAttributesTo:aMenuItem |
4164 setDelayedAttributesTo:aMenuItem |
4166 aMenuItem submenuChannel:(self submenuChannel). |
4165 aMenuItem submenuChannel:(self submenuChannel). |
4167 aMenuItem horizontalLayout:(menuItem horizontalLayout). |
4166 aMenuItem horizontalLayout:(menuItem horizontalLayout). |