From d730489dc274ba998e81d55543627f7907ec485b Mon Sep 17 00:00:00 2001 From: CyrilFerlicot Date: Tue, 30 Jan 2024 15:56:59 +0100 Subject: [PATCH] Remove some deprecated calls About packages --- .../FmxMBRealRingEnvironment.class.st | 2 +- src/FamixTestGenerator/FamixTestGenerator.class.st | 3 +-- 2 files changed, 2 insertions(+), 3 deletions(-) diff --git a/src/Famix-MetamodelBuilder-Core/FmxMBRealRingEnvironment.class.st b/src/Famix-MetamodelBuilder-Core/FmxMBRealRingEnvironment.class.st index 31925712..c76cd40a 100644 --- a/src/Famix-MetamodelBuilder-Core/FmxMBRealRingEnvironment.class.st +++ b/src/Famix-MetamodelBuilder-Core/FmxMBRealRingEnvironment.class.st @@ -168,7 +168,7 @@ FmxMBRealRingEnvironment >> recordMethodsAdoptionsOf: realClass to: anRGClass re FmxMBRealRingEnvironment >> recordPackagesChangesFor: resolvedPackages [ resolvedPackages - reject: [ :each | self packageOrganizer includesPackageNamed: each name ] + reject: [ :each | self packageOrganizer hasPackage: each name ] thenDo: [ :each | changesToApply add: (FmxPackageAddition named: each name) ] ] diff --git a/src/FamixTestGenerator/FamixTestGenerator.class.st b/src/FamixTestGenerator/FamixTestGenerator.class.st index 8d1857c3..dfcfffb8 100644 --- a/src/FamixTestGenerator/FamixTestGenerator.class.st +++ b/src/FamixTestGenerator/FamixTestGenerator.class.st @@ -18,9 +18,8 @@ FamixTestGenerator >> classes [ { #category : #'as yet unclassified' } FamixTestGenerator >> createPackageToPutGeneratedTests [ - (RPackageOrganizer new includesPackageNamed: self generator prefix, '-Tests') ifFalse: - [RPackageOrganizer new createPackageNamed: self generator prefix, '-Tests'] + (RPackageOrganizer new hasPackage: self generator prefix , '-Tests') ifFalse: [ RPackageOrganizer new ensurePackage: self generator prefix , '-Tests' ] ] { #category : #accessing }