--- a/SequenceableCollectionSorter.st	Sun Sep 08 15:43:28 2019 +0200
+++ b/SequenceableCollectionSorter.st	Sun Sep 08 15:51:29 2019 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1996 by Claus Gittinger
               All Rights Reserved
@@ -328,7 +330,7 @@
     and:[sortBlock isNil or:[sortBlock == DefaultSortBlock]]]) ifTrue:[
         self defaultSort:from to:to 
     ] ifFalse:[
-        sortBlock numArgs == 3 ifTrue:[
+        sortBlock argumentCount == 3 ifTrue:[
             self nonDefaultSort3:from to:to with:nil "p"
         ] ifFalse:[
             self nonDefaultSort:from to:to