--- a/MenuItem.st	Wed Feb 07 18:37:12 2018 +0100
+++ b/MenuItem.st	Wed Feb 14 12:57:48 2018 +0100
@@ -505,13 +505,11 @@
 !
 
 label:labelString itemValue:selectorOrBlock
-    self assert:(labelString isNil or:[labelString isString]).
-
     label := labelString.
     itemValue := selectorOrBlock.
 
     "Created: / 09-09-2012 / 13:18:34 / cg"
-    "Modified: / 24-01-2018 / 14:33:04 / mawalch"
+    "Modified (comment): / 14-02-2018 / 12:55:40 / mawalch"
 !
 
 label:labelString itemValue:selectorOrBlock argument:something
@@ -574,9 +572,10 @@
 !
 
 nameKey:aNameKey
+    self assert:(aNameKey isNil or:[aNameKey isString]).
     nameKey := aNameKey.
 
-
+    "Modified: / 14-02-2018 / 12:24:56 / mawalch"
 !
 
 rawLabel
@@ -866,12 +865,10 @@
 !
 
 label:aString
-    self assert:(aString isNil or:[aString isString]).
-
     label := aString.
 
     "Created: / 25-02-1997 / 19:55:16 / cg"
-    "Modified: / 24-01-2018 / 14:36:16 / mawalch"
+    "Modified: / 14-02-2018 / 12:23:41 / mawalch"
 !
 
 startGroup