equal
deleted
inserted
replaced
113 "Created: / 16-10-2006 / 13:09:27 / cg" |
113 "Created: / 16-10-2006 / 13:09:27 / cg" |
114 ! ! |
114 ! ! |
115 |
115 |
116 !MenuItem methodsFor:'Compatibility-ST80'! |
116 !MenuItem methodsFor:'Compatibility-ST80'! |
117 |
117 |
|
118 enablementSelector:aSymbol |
|
119 "dummy for now - for visualworks compatibility (specs)" |
|
120 |
|
121 "/ self halt. |
|
122 ! |
|
123 |
|
124 helpText:aString |
|
125 "dummy for now - for visualworks compatibility (specs)" |
|
126 |
|
127 activeHelpKey := aString. |
|
128 ! |
|
129 |
|
130 indicationSelector:aSymbol |
|
131 "dummy for now - for visualworks compatibility (specs)" |
|
132 |
|
133 "/ self halt. |
|
134 ! |
|
135 |
118 isEnabled:aBoolean |
136 isEnabled:aBoolean |
119 self enabled:aBoolean |
137 self enabled:aBoolean |
120 |
138 |
121 "Created: / 27.10.1997 / 16:34:55 / cg" |
139 "Created: / 27.10.1997 / 16:34:55 / cg" |
|
140 ! |
|
141 |
|
142 shortcutModifiers:something |
|
143 "dummy for now - for visualworks compatibility (specs)" |
|
144 |
|
145 "/ self halt. |
122 ! |
146 ! |
123 |
147 |
124 value |
148 value |
125 "obsolete - please use #itemValue (value is bad: it prevents us from using a valueHolder)" |
149 "obsolete - please use #itemValue (value is bad: it prevents us from using a valueHolder)" |
126 |
150 |
791 " |
815 " |
792 |
816 |
793 "Modified: / 4.2.2000 / 12:50:28 / cg" |
817 "Modified: / 4.2.2000 / 12:50:28 / cg" |
794 ! ! |
818 ! ! |
795 |
819 |
796 !MenuItem ignoredMethodsFor:'printing & storing'! |
|
797 |
|
798 displayString |
|
799 <resource: #obsolete> |
|
800 ^ self classNameWithArticle , '(' , label storeString , ')' |
|
801 ! ! |
|
802 |
|
803 !MenuItem methodsFor:'printing & storing'! |
820 !MenuItem methodsFor:'printing & storing'! |
804 |
821 |
805 printOn:aStream |
822 printOn:aStream |
806 aStream nextPutAll:self classNameWithArticle. |
823 aStream nextPutAll:self classNameWithArticle. |
807 aStream nextPutAll:'('. |
824 aStream nextPutAll:'('. |
931 ! ! |
948 ! ! |
932 |
949 |
933 !MenuItem class methodsFor:'documentation'! |
950 !MenuItem class methodsFor:'documentation'! |
934 |
951 |
935 version |
952 version |
936 ^ '$Header: /cvs/stx/stx/libview2/MenuItem.st,v 1.87 2009-09-07 18:45:59 cg Exp $' |
953 ^ '$Header: /cvs/stx/stx/libview2/MenuItem.st,v 1.88 2009-10-02 00:46:58 cg Exp $' |
937 ! ! |
954 ! |
|
955 |
|
956 version_CVS |
|
957 ^ '$Header: /cvs/stx/stx/libview2/MenuItem.st,v 1.88 2009-10-02 00:46:58 cg Exp $' |
|
958 ! ! |