# HG changeset patch # User Claus Gittinger # Date 1567950636 -7200 # Node ID 3a3f3accc53d6a205c7b7304739112efcb91c113 # Parent ba7f0ea254da87ba1123ecea24c54ec308a7323b #REFACTORING by exept class: SystemBrowser class changed: #browseAllCallsOn:in:ignoreCase:match:title: (send #argumentCount instead of #numArgs) #browseImplementorsOf:in:ignoreCase:title: (send #argumentCount instead of #numArgs) diff -r ba7f0ea254da -r 3a3f3accc53d SystemBrowser.st --- a/SystemBrowser.st Sun Sep 08 15:43:38 2019 +0200 +++ b/SystemBrowser.st Sun Sep 08 15:50:36 2019 +0200 @@ -2963,7 +2963,7 @@ list := self allCallsOn:aSelectorString in:aCollectionOfClasses ignoreCase:ignoreCase match:true. list isEmpty ifTrue:[ - aSelectorString numArgs == 0 ifTrue:[ + aSelectorString argumentCount == 0 ifTrue:[ selWithColon := aSelectorString , ':'. selWithColon knownAsSymbol ifTrue:[ list2 := self allCallsOn:selWithColon in:aCollectionOfClasses ignoreCase:ignoreCase match:true. @@ -3641,7 +3641,7 @@ match:(aSelectorString includesMatchCharacters and:[aSelectorString ~= '*']). list size == 0 ifTrue:[ - aSelectorString numArgs == 0 ifTrue:[ + aSelectorString argumentCount == 0 ifTrue:[ selWithColon := aSelectorString , ':'. selWithColon knownAsSymbol ifTrue:[ list2 := self findImplementorsOf:selWithColon in:aCollectionOfClasses ignoreCase:ignoreCase.