Fix more deprecations

pharo-spec · May 17, 2024 · 6fd8221 · 6fd8221
1 parent 866edc6
commit 6fd8221
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 7 deletions.
diff --git a/src/Spec2-CommonWidgets/SpChooserPresenter.class.st b/src/Spec2-CommonWidgets/SpChooserPresenter.class.st
@@ -48,11 +48,8 @@ SpChooserPresenter class >> exampleClasses [
 { #category : 'examples' }
 SpChooserPresenter class >> examplePackages [
 
-	^ (self
-		   sourceItems: RPackageOrganizer default packages
-		   chosenItems:
-		   { (RPackageOrganizer default packageNamed: 'Spec2-CommonWidgets') }
-		   displayBlock: #packageName) open
+	^ (self sourceItems: self packageOrganizer packages chosenItems: { (self packageOrganizer packageNamed: 'Spec2-CommonWidgets') } displayBlock: #packageName)
+		  open
 ]
 
 { #category : 'instance creation' }

diff --git a/src/Spec2-Examples/SpTransmissionComponentListExample.class.st b/src/Spec2-Examples/SpTransmissionComponentListExample.class.st
@@ -96,9 +96,9 @@ SpTransmissionComponentListExample >> initializePresenters [
 		display: [ :package | package name ];
 		displayIcon: [ self iconNamed: #package ];
 		sortingBlock: [ :a :b | a name < b name ];
-		items: RPackageOrganizer default packages.
+		items: self class packageOrganizer packages.
 
-	classesPresenter := self newComponentList.
+	classesPresenter := self newComponentList
 ]
 
 { #category : 'initialization' }