--- a/MenuItem.st	Tue Nov 28 19:20:00 2017 +0100
+++ b/MenuItem.st	Tue Nov 28 19:26:55 2017 +0100
@@ -531,11 +531,6 @@
     translateLabel := translateLabelBoolean
 !
 
-label:labelString submenuChannel:aSymbolOrValueHolder
-    label := labelString.
-    submenuChannel := aSymbolOrValueHolder
-!
-
 labelImage
     ^ labelImage
 !
@@ -644,18 +639,6 @@
     "Modified: / 5.2.2000 / 16:53:28 / cg"
 !
 
-submenuChannel
-    "get the submenuChannel or nil"
-    
-    ^ submenuChannel
-!
-
-submenuChannel:aMenuHolder 
-    "set the submenuChannel or nil"
-    
-    submenuChannel := aMenuHolder.
-!
-
 submenuProvider 
     "useful if a sub-menu is plugged in from another application (i.e. when
      a submenu is fetched via a channel AND the top-menus application cannot provide
@@ -803,6 +786,25 @@
     triggerOnDown := aBool.
 ! !
 
+!MenuItem methodsFor:'accessing-channels'!
+
+label:labelString submenuChannel:aSymbolOrValueHolder
+    label := labelString.
+    submenuChannel := aSymbolOrValueHolder
+!
+
+submenuChannel
+    "get the submenuChannel or nil"
+    
+    ^ submenuChannel
+!
+
+submenuChannel:aMenuHolder 
+    "set the submenuChannel or nil"
+    
+    submenuChannel := aMenuHolder.
+! !
+
 !MenuItem methodsFor:'accessing-look'!
 
 icon:anImage