[Enh]: Magritte CSV Writer - Support Non-SequencedCollections

seandenigris · seandenigris · commit 340be4c754c5 · 2025-01-21T21:17:32.000-05:00
Replace `first	`, which fails for e.g. Sets, with `atRandom`
diff --git a/repository/Neo-CSV-Magritte/MACSVWriter.class.st b/repository/Neo-CSV-Magritte/MACSVWriter.class.st
@@ -96,7 +96,7 @@ MACSVWriter >> map: aString fieldSource: aBlock [
 
 { #category : #accessing }
 MACSVWriter >> subjectDescription [
-	^ subjectDescription ifNil: [ subjectDescription := self subjects first magritteDescription ]
+	^ subjectDescription ifNil: [ subjectDescription := self subjects atRandom magritteDescription ]
 ]
 
 { #category : #accessing }

Original file line number	Diff line number	Diff line change
`@@ -96,7 +96,7 @@ MACSVWriter >> map: aString fieldSource: aBlock [`
`96`	`96`
`97`	`97`	`{ #category : #accessing }`
`98`	`98`	`MACSVWriter >> subjectDescription [`
`99`		`- ^ subjectDescription ifNil: [ subjectDescription := self subjects first magritteDescription ]`
	`99`	`+ ^ subjectDescription ifNil: [ subjectDescription := self subjects atRandom magritteDescription ]`
`100`	`100`	`]`
`101`	`101`
`102`	`102`	`{ #category : #accessing }`