--- a/MenuItem.st Wed Oct 12 18:53:49 2011 +0200
+++ b/MenuItem.st Wed Oct 12 23:03:46 2011 +0200
@@ -998,12 +998,29 @@
"Created: 25.2.1997 / 19:39:17 / cg"
! !
+!MenuItem methodsFor:'utilities'!
+
+replaceArgument: oldValue with: newValue
+
+ "Recusively Replace argument in menu items where
+ current argument is equal to oldValue by newValue"
+
+ argument = oldValue ifTrue:[
+ argument := newValue.
+ ].
+ submenu notNil ifTrue:[
+ submenu replaceArgument: oldValue with: newValue
+ ].
+
+ "Created: / 12-10-2011 / 20:12:28 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
!MenuItem class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview2/MenuItem.st,v 1.94 2011-09-08 02:52:33 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/MenuItem.st,v 1.95 2011-10-12 21:03:46 vrany Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libview2/MenuItem.st,v 1.94 2011-09-08 02:52:33 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/MenuItem.st,v 1.95 2011-10-12 21:03:46 vrany Exp $'
! !