--- a/HTMLDocGenerator.st	Sun Sep 08 15:58:59 2019 +0200
+++ b/HTMLDocGenerator.st	Sun Sep 08 16:00:39 2019 +0200
@@ -553,7 +553,7 @@
         argStream := args readStream.
 
         methodSpecLine := ''. 
-        1 to:sel numArgs do:[:index |
+        1 to:sel argumentCount do:[:index |
             methodSpecLine size ~~ 0 ifTrue:[
                 methodSpecLine := methodSpecLine , ' '
             ].
@@ -2009,7 +2009,7 @@
                 comment := '<I>(comment from inherited method)</I><BR>' , comment.
             ].
             "/ make argument names italic in the comment
-            aMethod numArgs > 0 ifTrue:[    
+            aMethod argumentCount > 0 ifTrue:[    
                 (aMethod methodArgNames ? #()) do:[:each |
                     comment := comment copyReplaceString:each withString:'<I>',each,'</I>' 
                 ].