CodeGeneratorTool.st
branchjv
changeset 19595 2c27552f5d76
parent 18226 346376844040
child 19607 f9108fde4972
--- a/CodeGeneratorTool.st	Mon Nov 16 23:17:49 2020 +0000
+++ b/CodeGeneratorTool.st	Mon Feb 01 10:24:18 2021 +0000
@@ -1,6 +1,7 @@
 "
  COPYRIGHT (c) 2002 by eXept Software AG
  COPYRIGHT (c) 2016 Jan Vrany
+ COPYRIGHT (c) 2021 LabWare
               All Rights Reserved
 
  This software is furnished under a license and may be used
@@ -29,6 +30,7 @@
 "
  COPYRIGHT (c) 2002 by eXept Software AG
  COPYRIGHT (c) 2016 Jan Vrany
+ COPYRIGHT (c) 2021 LabWare
               All Rights Reserved
 
  This software is furnished under a license and may be used
@@ -879,7 +881,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.
                 ]
@@ -1757,6 +1759,19 @@
     generateComments := userPreferences generateComments.
 ! !
 
+!CodeGeneratorTool methodsFor:'inspecting'!
+
+inspector2TabBrowser
+    <inspector2Tab>
+
+    ^self newInspector2Tab
+        label: 'Changes';    
+        priority: 35;
+        application: (Tools::ChangeSetBrowser2 on: (ChangeSet with:compositeChangeCollector))
+
+    "Created: / 01-02-2021 / 08:35:45 / Jan Vrany <jan.vrany@labware.com>"
+! !
+
 !CodeGeneratorTool methodsFor:'private'!
 
 canUseRefactoringSupport