--- a/CodeGeneratorTool.st	Sat Feb 04 22:21:31 2017 +0100
+++ b/CodeGeneratorTool.st	Sun Feb 05 01:36:55 2017 +0100
@@ -871,7 +871,7 @@
 
     aClass allSuperclassesDo:[:eachSuperClass |
         eachSuperClass methodDictionary keysAndValuesDo:[:eachSelector :eachMethod |
-            (eachMethod sendsAny:#( #subclassResponsibility #subclassResponsibility: )) ifTrue:[
+            (eachMethod sendsAnySelector:#( #subclassResponsibility #subclassResponsibility: )) ifTrue:[
                 (implementedSelectors includes:eachSelector) ifFalse:[
                     requiredSelectors add:eachSelector.
                 ]
@@ -884,8 +884,8 @@
     ].
     ^ requiredSelectors
 
-    "Modified: / 08-08-2011 / 18:44:58 / cg"
     "Modified: / 10-01-2015 / 06:46:11 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 05-02-2017 / 01:27:40 / cg"
 ! !
 
 !CodeGeneratorTool class methodsFor:'utilities - source code'!