Merge branch 'dev' into ToSelectionModelSelecter

pharo-graphics · Mar 27, 2024 · 7c103bd · 7c103bd
2 parents 24777c2 + 208c07d
commit 7c103bd
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/src/Toplo-Examples/ToListElementStresser.class.st b/src/Toplo-Examples/ToListElementStresser.class.st
@@ -295,9 +295,8 @@ ToListElementStresser >> newListElement [
 ToListElementStresser >> newStressedListNumber: aNumber [
 
 	| list process size ident priority suffix sieve |
-	rand := Random new.
 
-	list := self newListElement.
+	list := ToListElement new.
 	sieve := ToListElementSieve new.
 	list userData at: #sieve put: sieve.