diff --git a/src/AST-Tests-Core/RBParseTreeRewriterTest.class.st b/src/AST-Tests-Core/RBParseTreeRewriterTest.class.st index af623099264..e5c3487dfa4 100644 --- a/src/AST-Tests-Core/RBParseTreeRewriterTest.class.st +++ b/src/AST-Tests-Core/RBParseTreeRewriterTest.class.st @@ -7,7 +7,7 @@ Class { #category : #'AST-Tests-Core' } -{ #category : #utils } +{ #category : #utilities } RBParseTreeRewriterTest >> compare: anObject to: anotherObject [ self assert: anObject hash = anotherObject hash. self assert: anObject = anotherObject diff --git a/src/NECompletion-Tests/NECClassVarTypeGuesserTest.class.st b/src/NECompletion-Tests/NECClassVarTypeGuesserTest.class.st index cdda902fba0..9e94df598e8 100644 --- a/src/NECompletion-Tests/NECClassVarTypeGuesserTest.class.st +++ b/src/NECompletion-Tests/NECClassVarTypeGuesserTest.class.st @@ -4,7 +4,7 @@ Class { #category : #'NECompletion-Tests' } -{ #category : #utils } +{ #category : #utilities } NECClassVarTypeGuesserTest >> guessVariable: aString in: aClass expected: theClassExpected [ | typeGuesser result | typeGuesser := NECClassVarTypeGuesser diff --git a/src/RPackage-Tests/RPackageTestCase.class.st b/src/RPackage-Tests/RPackageTestCase.class.st index 146616249e7..34f8c027c65 100644 --- a/src/RPackage-Tests/RPackageTestCase.class.st +++ b/src/RPackage-Tests/RPackageTestCase.class.st @@ -14,18 +14,18 @@ Class { #category : #'RPackage-Tests' } -{ #category : #utils } +{ #category : #utilities } RPackageTestCase >> allManagers [ ^ MCWorkingCopy allManagers ] -{ #category : #utility } +{ #category : #utilities } RPackageTestCase >> createNewClassNamed: aName [ ^ self createNewClassNamed: aName inCategory: 'RPackageTest' ] -{ #category : #utility } +{ #category : #utilities } RPackageTestCase >> createNewClassNamed: aName inCategory: cat [ | cls | @@ -39,7 +39,7 @@ RPackageTestCase >> createNewClassNamed: aName inCategory: cat [ ^ cls ] -{ #category : #utility } +{ #category : #utilities } RPackageTestCase >> createNewClassNamed: aName inPackage: p [ | cls | @@ -48,7 +48,7 @@ RPackageTestCase >> createNewClassNamed: aName inPackage: p [ ^ cls ] -{ #category : #utility } +{ #category : #utilities } RPackageTestCase >> createNewPackageNamed: aName [ | pack | @@ -58,12 +58,12 @@ RPackageTestCase >> createNewPackageNamed: aName [ ^ pack ] -{ #category : #utility } +{ #category : #utilities } RPackageTestCase >> createNewTraitNamed: aName [ ^ self createNewTraitNamed: aName inCategory: 'RPackageTest' ] -{ #category : #utility } +{ #category : #utilities } RPackageTestCase >> createNewTraitNamed: aName inCategory: cat [ | cls | @@ -75,7 +75,7 @@ RPackageTestCase >> createNewTraitNamed: aName inCategory: cat [ ^ cls ] -{ #category : #utility } +{ #category : #utilities } RPackageTestCase >> createNewTraitNamed: aName inPackage: p [ | cls | @@ -109,7 +109,7 @@ RPackageTestCase >> packageOrganizerClass [ ^ RPackageOrganizer ] -{ #category : #utility } +{ #category : #utilities } RPackageTestCase >> removePackage: aName [ self packageClass organizer basicUnregisterPackageNamed: aName. diff --git a/src/Tests/SystemNavigationTest.class.st b/src/Tests/SystemNavigationTest.class.st index 286139cd66f..fecbeed1f8a 100644 --- a/src/Tests/SystemNavigationTest.class.st +++ b/src/Tests/SystemNavigationTest.class.st @@ -29,7 +29,7 @@ SystemNavigationTest >> createClassFactory [ ^ ClassFactoryWithOrganization newWithOrganization: self organizationToTest ] -{ #category : #utils } +{ #category : #utilities } SystemNavigationTest >> createMethodNamed: selector realParent: class [ ^ RGMethodDefinition realClass: class selector: selector diff --git a/src/Tests/TraitTest.class.st b/src/Tests/TraitTest.class.st index 9866828d22f..040ed6b8847 100644 --- a/src/Tests/TraitTest.class.st +++ b/src/Tests/TraitTest.class.st @@ -4,7 +4,7 @@ Class { #category : #'Tests-Traits' } -{ #category : #utils } +{ #category : #utilities } TraitTest >> createClassUsing: aTrait [ ^ Object subclass: #AClassForTests @@ -15,7 +15,7 @@ TraitTest >> createClassUsing: aTrait [ category: 'AAA' ] -{ #category : #utils } +{ #category : #utilities } TraitTest >> createTrait [ | trait | trait := Trait named: #ATraitForTests uses: {} category: 'AAA'. diff --git a/src/Text-Core/TextAlignment.class.st b/src/Text-Core/TextAlignment.class.st index 637566e919a..c5a79e8e1a5 100644 --- a/src/Text-Core/TextAlignment.class.st +++ b/src/Text-Core/TextAlignment.class.st @@ -24,7 +24,7 @@ Class { #category : #'Text-Core' } -{ #category : #utils } +{ #category : #utilities } TextAlignment class >> alignmentSymbol: alignmentCode [ ^#(leftFlush rightFlush centered justified) at: (alignmentCode + 1) ] @@ -77,7 +77,7 @@ TextAlignment >> hash [ ^ alignment hash ] -{ #category : #utils } +{ #category : #utilities } TextAlignment >> writeScanOn: strm [ strm nextPut: $a.