fixed auto-correction involving variables

OpenSmock · Sep 19, 2023 · 7838378 · 7838378
1 parent 2cf7e12
commit 7838378
Show file tree

Hide file tree

Showing 3 changed files with 16 additions and 12 deletions.
diff --git a/Molecule/MolComponentImpl.trait.st b/Molecule/MolComponentImpl.trait.st
@@ -85,8 +85,8 @@ MolComponentImpl classSide >> instanciate: aComponentName [
 
 	self
 		deprecated: 'Use instantiate:'
-		transformWith:
-		'`@receiver instanciate: @aComponentName' -> '`@receiver instantiate: @aComponentName'.
+		transformWith: '`@receiver instanciate: `@aComponentName'
+			-> '`@receiver instantiate: `@aComponentName'.
 	^ MolComponentManager default homeServices
 		  instanciateComponent: self
 		  named: aComponentName

diff --git a/Molecule/MolHomeServices.class.st b/Molecule/MolHomeServices.class.st
@@ -73,8 +73,10 @@ MolHomeServices >> checkInstanciationOfComponent: aComponentClass named: aCompon
 	| deployed component overridedTypes |
 	self
 		deprecated: 'Use checkInstantiationOfComponent: named:'
-		transformWith: '`@receiver checkInstanciationOfComponent: @aComponentClass named: @aComponentName'
-			-> '`@receiver checkInstantiationOfComponent: @aComponentClass named: @aComponentName'.
+		transformWith:
+			'`@receiver checkInstanciationOfComponent: `@aComponentClass named: `@aComponentName'
+			->
+			'`@receiver checkInstantiationOfComponent: `@aComponentClass named: `@aComponentName'.
 	aComponentName ifNil: [
 		^ WrongComponentNameError new messageText:
 			  'Can not instanciate a component without name' ].
@@ -224,8 +226,8 @@ MolHomeServices >> instanciateComponent: aComponentClass [
 
 	self
 		deprecated: 'Use instantiateComponent:'
-		transformWith: '`@receiver instanciateComponent: @aComponentClass'
-			-> '`@receiver instantiateComponent: @aComponentClass'.
+		transformWith: '`@receiver instanciateComponent: `@aComponentClass'
+			-> '`@receiver instantiateComponent: `@aComponentClass'.
 	^ self
 		  instanciateComponent: aComponentClass
 		  named: MolUtils defaultComponentName
@@ -237,8 +239,10 @@ MolHomeServices >> instanciateComponent: aComponentClass named: aName [
 	| error component connector deployed |
 	self
 		deprecated: 'Use instantiateComponent: named:'
-		transformWith: '`@receiver instanciateComponent: @aComponentClass named: @aName'
-			-> '`@receiver instantiateComponent: @aComponentClass named: @aName'.
+		transformWith:
+			'`@receiver instanciateComponent: `@aComponentClass named: `@aName'
+			->
+			'`@receiver instantiateComponent: `@aComponentClass named: `@aName'.
 	aComponentClass ifNil: [ ^ nil ].
 	error := self
 		         checkInstanciationOfComponent: aComponentClass

diff --git a/Molecule/MolUtils.class.st b/Molecule/MolUtils.class.st
@@ -154,8 +154,8 @@ MolUtils class >> isInstanciateComponentOf: aClass [
 
 	self
 		deprecated: 'Use isInstantiateComponentOf:'
-		transformWith: '`@receiver isInstanciateComponentOf: @aClass'
-			-> '`@receiver isInstantiateComponentOf: @aClass'.
+		transformWith: '`@receiver isInstanciateComponentOf: `@aClass'
+			-> '`@receiver isInstantiateComponentOf: `@aClass'.
 	^ self
 		  isInstanciateComponentOf: aClass
 		  named: self defaultComponentName
@@ -167,8 +167,8 @@ MolUtils class >> isInstanciateComponentOf: aClass named: aName [
 	self
 		deprecated: 'Use isInstantiateComponentOf: named: '
 		transformWith:
-			'`@receiver isInstanciateComponentOf: @aClass named: @aName'
-			-> '`@receiver isInstantiateComponentOf: @aClass named: @aName'.
+			'`@receiver isInstanciateComponentOf: `@aClass named: `@aName'
+			-> '`@receiver isInstantiateComponentOf: `@aClass named: `@aName'.
 	^ (MolComponentManager default homeServices
 		   instanceOf: aClass
 		   named: aName) notNil