--- 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 $'
 ! !