Merge pull request #623 from vonbecmann/614-expression-finder-didnt-f…

…ind-expression also collect class side methods
pharo-spec · Nov 23, 2023 · 1a7f3d8 · 1a7f3d8
2 parents 699bdf2 + fe9f234
commit 1a7f3d8
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 2 deletions.
diff --git a/src/NewTools-RewriterTools-Backend/StRewriterRenrakuApplier.class.st b/src/NewTools-RewriterTools-Backend/StRewriterRenrakuApplier.class.st
@@ -68,6 +68,7 @@ Take a look on ReCriticEngine for some automation ideas. Also take a look at Com
 StRewriterRenrakuApplier class >> obtainCritiquesOfAllMethodsForRules: ruleHolderCollection [
 
 	| methods |
-	methods := (self packageOrganizer packages flatCollect: #classes) flatCollect: #methods.
+	methods := (self packageOrganizer packages flatCollect: #classes)
+		           flatCollect: [ :each | each methods , each class methods ].
 	^ self obtainCritiquesOf: methods forRules: ruleHolderCollection
 ]
diff --git a/src/NewTools-RewriterTools/StRewriterExpressionFinderPresenter.class.st b/src/NewTools-RewriterTools/StRewriterExpressionFinderPresenter.class.st
@@ -125,7 +125,7 @@ StRewriterExpressionFinderPresenter >> searchExpressionOnAllClasses [
 	| dialogWindow methods ruleHolder critiques |
 	dialogWindow := scopeSelectorPresenter openDialog.
 	dialogWindow okAction: [
-		methods := scopeSelectorPresenter selectedClasses flatCollectAsSet: [ :each | each methods ].
+		methods := scopeSelectorPresenter selectedClasses flatCollectAsSet: [ :each | each methods, each class methods ].
 		ruleHolder := StRewriterRuleHolder lhs: patternCodePresenter lhs rhs: ''.
 		critiques := StRewriterRenrakuApplier obtainCritiquesOf: methods forRules: { ruleHolder }.
 		(StRewriterOccurrencesBrowserPresenter critiques: critiques) open ]