equal
deleted
inserted
replaced
820 |coll| |
820 |coll| |
821 |
821 |
822 coll := super skippedInLiteralEncoding asOrderedCollection. |
822 coll := super skippedInLiteralEncoding asOrderedCollection. |
823 |
823 |
824 label isNil ifTrue:[ coll add:#label ]. |
824 label isNil ifTrue:[ coll add:#label ]. |
825 (translateLabel isNil or:[#('' '-' '=') includes:label]) ifTrue:[ coll add:#translateLabel ]. |
825 (translateLabel isNil or:[translateLabel == true or:[#('' '-' '=') includes:label]]) ifTrue:[ coll add:#translateLabel ]. |
826 self isButton ifFalse:[ coll add:#isButton ]. |
826 self isButton ifFalse:[ coll add:#isButton ]. |
827 self triggerOnDown ifFalse:[ coll add:#triggerOnDown ]. |
827 self triggerOnDown ifFalse:[ coll add:#triggerOnDown ]. |
828 self hideMenuOnActivated ifTrue:[ coll add:#hideMenuOnActivated]. |
828 self hideMenuOnActivated ifTrue:[ coll add:#hideMenuOnActivated]. |
829 nameKey isNil ifTrue:[ coll add:#nameKey ]. |
829 nameKey isNil ifTrue:[ coll add:#nameKey ]. |
830 (self isVisible ? true) ifTrue:[coll add:#isVisible]. |
830 (self isVisible ? true) ifTrue:[coll add:#isVisible]. |
852 self ignoreMnemonicKeys ifFalse:[coll add:#ignoreMnemonicKeys ]. |
852 self ignoreMnemonicKeys ifFalse:[coll add:#ignoreMnemonicKeys ]. |
853 |
853 |
854 self isMenuSlice ifFalse:[coll add:#isMenuSlice]. |
854 self isMenuSlice ifFalse:[coll add:#isMenuSlice]. |
855 |
855 |
856 ^ coll |
856 ^ coll |
|
857 |
|
858 "Modified: / 22-08-2012 / 21:22:20 / cg" |
857 ! ! |
859 ! ! |
858 |
860 |
859 !MenuItem methodsFor:'encoding & decoding'! |
861 !MenuItem methodsFor:'encoding & decoding'! |
860 |
862 |
861 fromLiteralArrayEncoding:aLiteralEncodedArray |
863 fromLiteralArrayEncoding:aLiteralEncodedArray |
1038 ! ! |
1040 ! ! |
1039 |
1041 |
1040 !MenuItem class methodsFor:'documentation'! |
1042 !MenuItem class methodsFor:'documentation'! |
1041 |
1043 |
1042 version |
1044 version |
1043 ^ '$Header: /cvs/stx/stx/libview2/MenuItem.st,v 1.97 2012-04-26 10:36:26 cg Exp $' |
1045 ^ '$Header: /cvs/stx/stx/libview2/MenuItem.st,v 1.98 2012-08-22 20:05:32 cg Exp $' |
1044 ! |
1046 ! |
1045 |
1047 |
1046 version_CVS |
1048 version_CVS |
1047 ^ '$Header: /cvs/stx/stx/libview2/MenuItem.st,v 1.97 2012-04-26 10:36:26 cg Exp $' |
1049 ^ '$Header: /cvs/stx/stx/libview2/MenuItem.st,v 1.98 2012-08-22 20:05:32 cg Exp $' |
1048 ! ! |
1050 ! ! |