fix: use platform specific class in tests

hpi-swa · Feb 9, 2024 · 4839b1f · 4839b1f
1 parent 61bdb1a
commit 4839b1f
Showing 1 changed file with 5 additions and 5 deletions.
diff --git a/repository/SmalltalkCI-Tests.package/SmalltalkCITest.class/instance/testAuthor.st b/repository/SmalltalkCI-Tests.package/SmalltalkCITest.class/instance/testAuthor.st
@@ -1,11 +1,11 @@
 testing
 testAuthor
 	| currentAuthor |
-	currentAuthor := SmalltalkCI getAuthor.
+	currentAuthor := SmalltalkCI platformClass getAuthor.
 
 	[
-	SmalltalkCI basicNew initialize.
-	self deny: SmalltalkCI defaultAuthor isNil.
+	SmalltalkCI platformClass: nil.
+	self deny: SmalltalkCI platformClass defaultAuthor isNil.
 	] ensure: [
-		SmalltalkCI setAuthor: currentAuthor.
-		self assert: SmalltalkCI getAuthor equals: currentAuthor ]
+		SmalltalkCI platformClass setAuthor: currentAuthor.
+		self assert: SmalltalkCI platformClass getAuthor equals: currentAuthor ]