--- a/Tools__TestRunner2.st	Tue Jul 08 15:19:34 2014 +0200
+++ b/Tools__TestRunner2.st	Tue Jul 08 15:21:36 2014 +0200
@@ -130,11 +130,11 @@
 
 
     "Install in Tools menu"
-    menuItem := (MenuItem label:'SUnit Test Runner (enhanced)')
-                nameKey:#TestRunner2;
-                labelImage:self startSUnitIcon;
-                value:action;
-                isButton:false.
+    menuItem := MenuItem label:'SUnit Test Runner (enhanced)' itemValue:action.
+    menuItem
+        nameKey:#TestRunner2;
+        labelImage:self startSUnitIcon;
+        isButton:false.
     NewLauncher 
         addMenuItem:menuItem
         from:self
@@ -1875,7 +1875,7 @@
 !TestRunner2::ClassList class methodsFor:'documentation'!
 
 version
-    ^'$Header: /cvs/stx/stx/libtool/Tools__TestRunner2.st,v 1.52 2014-07-08 13:19:34 cg Exp $'
+    ^'$Header: /cvs/stx/stx/libtool/Tools__TestRunner2.st,v 1.53 2014-07-08 13:21:36 cg Exp $'
 ! !
 
 !TestRunner2::ClassList methodsFor:'private'!
@@ -2380,15 +2380,15 @@
 !TestRunner2 class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__TestRunner2.st,v 1.52 2014-07-08 13:19:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__TestRunner2.st,v 1.53 2014-07-08 13:21:36 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__TestRunner2.st,v 1.52 2014-07-08 13:19:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__TestRunner2.st,v 1.53 2014-07-08 13:21:36 cg Exp $'
 !
 
 version_SVN
-    ^ '$Id: Tools__TestRunner2.st,v 1.52 2014-07-08 13:19:34 cg Exp $'
+    ^ '$Id: Tools__TestRunner2.st,v 1.53 2014-07-08 13:21:36 cg Exp $'
 ! !