equal
deleted
inserted
replaced
1231 selected item, nil if none was selected" |
1231 selected item, nil if none was selected" |
1232 |
1232 |
1233 ^ (MenuPanel menu:self) startUpOrNil |
1233 ^ (MenuPanel menu:self) startUpOrNil |
1234 ! ! |
1234 ! ! |
1235 |
1235 |
|
1236 !Menu methodsFor:'utilities'! |
|
1237 |
|
1238 replaceArgument: oldValue with: newValue |
|
1239 |
|
1240 "Recusively Replace argument in menu items where |
|
1241 current argument is equal to oldValue by newValue" |
|
1242 |
|
1243 self itemsDo:[:item| |
|
1244 item replaceArgument: oldValue with: newValue |
|
1245 ] |
|
1246 |
|
1247 "Created: / 12-10-2011 / 20:11:16 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
1248 ! ! |
|
1249 |
1236 !Menu class methodsFor:'documentation'! |
1250 !Menu class methodsFor:'documentation'! |
1237 |
1251 |
1238 version_CVS |
1252 version_CVS |
1239 ^ '$Header: /cvs/stx/stx/libview2/Menu.st,v 1.82 2011-10-07 19:46:48 vrany Exp $' |
1253 ^ '$Header: /cvs/stx/stx/libview2/Menu.st,v 1.83 2011-10-12 21:03:59 vrany Exp $' |
1240 ! ! |
1254 ! ! |