--- a/MenuItem.st	Mon Feb 13 23:20:51 2012 +0100
+++ b/MenuItem.st	Tue Feb 14 15:17:29 2012 +0100
@@ -455,19 +455,19 @@
     "Modified: / 19.6.1998 / 00:33:58 / cg"
 !
 
-submenu:something 
+submenu:aMenu 
     "set the submenu or nil"
     
-    (something isValueModel or:[ something isBlock ]) ifTrue:[
+    (aMenu isValueModel or:[ aMenu isBlock ]) ifTrue:[
         submenuChannel notNil ifTrue:[
             "/ programmers error ?
             "/ how can I decide which one to use if there is both
             "/ a channel and a subMenu ...
             self error:'overwriting submenuchannel' mayProceed:true.
         ].
-        submenuChannel := something
+        submenuChannel := aMenu
     ] ifFalse:[
-        submenu := something.
+        submenu := aMenu.
     ]
 
     "Created: / 25.2.1997 / 20:59:28 / cg"
@@ -480,10 +480,10 @@
     ^ submenuChannel
 !
 
-submenuChannel:something 
+submenuChannel:aMenuHolder 
     "set the submenuChannel or nil"
     
-    submenuChannel := something.
+    submenuChannel := aMenuHolder.
 !
 
 submenuProvider 
@@ -1018,9 +1018,9 @@
 !MenuItem class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/MenuItem.st,v 1.95 2011-10-12 21:03:46 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/MenuItem.st,v 1.96 2012-02-14 14:17:29 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview2/MenuItem.st,v 1.95 2011-10-12 21:03:46 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/MenuItem.st,v 1.96 2012-02-14 14:17:29 cg Exp $'
 ! !