--- a/mercurial/extensions.st	Tue Jan 21 16:06:56 2020 +0100
+++ b/mercurial/extensions.st	Wed Feb 19 21:08:02 2020 +0100
@@ -290,12 +290,7 @@
                     itemValue: [self hgMerge:head ].
         menu addItem: item.
     ].
-    menu addItem:
-        (MenuItem 
-            label:'Revision...'
-            itemValue: [ self hgMergeWithRevision ]).          
-
-
+    menu addItemLabel:'Revision...' value:[ self hgMergeWithRevision ].          
     ^menu.
 
     "Created: / 14-12-2012 / 19:14:17 / Jan Vrany <jan.vrany@fit.cvut.cz>"
@@ -378,12 +373,7 @@
         menu addItem: item.
     ].  
     menu addSeparator.
-    menu addItem:
-        (MenuItem 
-            label:'Revision...'
-            itemValue: [ self hgUpdateToRevision ]).
-
-
+    menu addItemLabel:'Revision...' value: [ self hgUpdateToRevision ].
     ^menu.
 
     "Created: / 28-03-2014 / 00:00:48 / Jan Vrany <jan.vrany@fit.cvut.cz>"