--- a/MenuPanel.st	Sun Sep 08 15:40:29 2019 +0200
+++ b/MenuPanel.st	Sun Sep 08 15:59:25 2019 +0200
@@ -1055,7 +1055,7 @@
                 rec := app.
             ].
 
-            (numArgs := selectorOrBlock numArgs) == 0 ifTrue:[
+            (numArgs := selectorOrBlock argumentCount) == 0 ifTrue:[
                 args := nil
             ] ifFalse:[
                 numArgs == 1 ifTrue:[
@@ -8879,7 +8879,7 @@
     sel := menuItem submenuChannel.
     (sel isString or:[sel isSymbol]) ifFalse:[^ nil].
     sel := sel asSymbol.
-    numArgs := sel numArgs.
+    numArgs := sel argumentCount.
 
     numArgs == 0 ifTrue:[
         gotMenu := false.
@@ -8936,7 +8936,7 @@
         ^ indication value == true          "block or model"
     ].
 
-    numArgs := indication numArgs.
+    numArgs := indication argumentCount.
     numArgs == 2 ifTrue:[
         recv := menuPanel receiver ? menuPanel application.
         (recv notNil and:[recv isValueModel not]) ifTrue:[
@@ -8978,7 +8978,7 @@
         ^ self
     ].
 
-    (numArgs := indication numArgs) == 0 ifTrue:[                       "no arguments to selector; cannot set"
+    (numArgs := indication argumentCount) == 0 ifTrue:[                       "no arguments to selector; cannot set"
         ^ self
     ].