Merge pull request #15225 from balsa-sarenac/feat/add-override-method

Feat: Add Override method transformation

src/Refactoring-Core/RBAddOverrideMethodTransformation.class.st

@@ -0,0 +1,20 @@
+"
+I am a subclass of Add Method Refactoring that loosens preconditions.
+
+Add Method has the breaking change that methods should not be defined in the target class or its superclasses.
+Add Override Method allows Refactoring to create a method in a class that can override a superclass method, but it does not allow overwrite of a method that is directly defined in that class.
+
+"
+Class {
+	#name : 'RBAddOverrideMethodTransformation',
+	#superclass : 'RBAddMethodRefactoring',
+	#category : 'Refactoring-Core-Refactorings',
+	#package : 'Refactoring-Core',
+	#tag : 'Refactorings'
+}
+
+{ #category : 'preconditions' }
+RBAddOverrideMethodTransformation >> preconditions [
+
+	^ (RBCondition definesSelector: transformation selector in: class) not
+]

src/Refactoring-Transformations/RBAddVariableAccessorTransformation.class.st

@@ -68,7 +68,7 @@ RBAddVariableAccessorTransformation >> defineSetterMethod [
 	|  sourceCode |
 	sourceCode := '<1s> anObject<r><r><t><2s> := anObject'.
 	setterMethod := self safeMethodNameFor: self definingClass basedOn: variableName asString , ':'.
-	(RBAddMethodTransformation
+	(RBAddMethodTransformation 
 		model: self model
 		sourceCode: (sourceCode expandMacrosWith: setterMethod with: variableName)
 		in: self definingClass