--- a/Tools__NavigationHistory.st	Wed Feb 19 21:04:02 2020 +0100
+++ b/Tools__NavigationHistory.st	Wed Feb 19 21:04:12 2020 +0100
@@ -272,11 +272,11 @@
     any := false.
     menu := Menu new.
     self goBackItems do:[:item | 
-        menu addItem:(MenuItem label:item displayString itemValue:[ self goTo:item ]).
+        menu addItemLabel:item displayString value:[ self goTo:item ].
         any := true.
     ].
     menu addSeparator.
-    menu addItem:((MenuItem label:'Clear History' itemValue:[ self clearHistory]) enabled:any).    
+    menu addItemLabel:'Clear History' value:[ self clearHistory] enabled:any.    
     ^ menu
 
     "Created: / 22-02-2008 / 16:57:46 / janfrog"
@@ -289,7 +289,7 @@
 
     menu := Menu new.
     self goForwardItems do:[:item | 
-        menu addItem:(MenuItem label:item displayString itemValue:[ self goTo:item ])
+        menu addItemLabel:item displayString value:[ self goTo:item ]
     ].
     ^ menu