equal
deleted
inserted
replaced
172 |
172 |
173 auxValue := something |
173 auxValue := something |
174 ! |
174 ! |
175 |
175 |
176 choice:something |
176 choice:something |
177 "set the value of the instance variable 'choice' (automatically generated)" |
|
178 |
|
179 choice := something. |
177 choice := something. |
180 |
178 |
181 "Created: / 14.8.1998 / 14:32:06 / cg" |
179 "Created: / 14.8.1998 / 14:32:06 / cg" |
182 ! |
180 ! |
183 |
181 |
184 choiceValue |
182 choiceValue |
185 "return the value of the instance variable 'choiceValue' (automatically generated)" |
|
186 |
|
187 ^ choiceValue |
183 ^ choiceValue |
188 |
184 |
189 "Created: / 14.8.1998 / 15:39:26 / cg" |
185 "Created: / 14.8.1998 / 15:39:26 / cg" |
190 ! |
186 ! |
191 |
187 |
192 choiceValue:something |
188 choiceValue:something |
193 "set the value of the instance variable 'choiceValue' (automatically generated)" |
|
194 |
|
195 choiceValue := something. |
189 choiceValue := something. |
196 |
190 |
197 "Created: / 14.8.1998 / 15:39:26 / cg" |
191 "Created: / 14.8.1998 / 15:39:26 / cg" |
198 ! |
192 ! |
199 |
193 |
290 |
284 |
291 "Created: 25.2.1997 / 19:11:13 / cg" |
285 "Created: 25.2.1997 / 19:11:13 / cg" |
292 ! |
286 ! |
293 |
287 |
294 keepLinkedMenu |
288 keepLinkedMenu |
295 "return the value of the instance variable 'keepLinkedMenu' (automatically generated)" |
|
296 |
|
297 ^ keepLinkedMenu ? false |
289 ^ keepLinkedMenu ? false |
298 ! |
290 ! |
299 |
291 |
300 keepLinkedMenu:aBoolean |
292 keepLinkedMenu:aBoolean |
301 "set the value of the instance variable 'keepLinkedMenu' (automatically generated)" |
|
302 |
|
303 keepLinkedMenu := aBoolean ? false. |
293 keepLinkedMenu := aBoolean ? false. |
304 ! |
294 ! |
305 |
295 |
306 labelImage |
296 labelImage |
307 "return the value of the instance variable 'labelImage' (automatically generated)" |
|
308 |
|
309 ^ labelImage |
297 ^ labelImage |
310 ! |
298 ! |
311 |
299 |
312 labelImage:something |
300 labelImage:something |
313 "set the value of the instance variable 'labelImage' (automatically generated)" |
|
314 |
|
315 labelImage := something. |
301 labelImage := something. |
|
302 |
|
303 "/ VW compatibility: if I have a label also, |
|
304 "/ this will become a LabelAndImage. |
|
305 something isImage ifTrue:[ |
|
306 label notNil ifTrue:[ |
|
307 labelImage := LabelAndIcon icon:labelImage string:label |
|
308 ] |
|
309 ]. |
316 ! |
310 ! |
317 |
311 |
318 nameKey |
312 nameKey |
319 ^ nameKey |
313 ^ nameKey |
320 |
314 |
878 ! ! |
872 ! ! |
879 |
873 |
880 !MenuItem class methodsFor:'documentation'! |
874 !MenuItem class methodsFor:'documentation'! |
881 |
875 |
882 version |
876 version |
883 ^ '$Header: /cvs/stx/stx/libview2/MenuItem.st,v 1.76 2006-03-06 08:56:36 cg Exp $' |
877 ^ '$Header: /cvs/stx/stx/libview2/MenuItem.st,v 1.77 2006-03-13 15:54:25 cg Exp $' |
884 ! ! |
878 ! ! |