diff --git a/repository/Neo-CSV-Magritte/MACSVWriter.class.st b/repository/Neo-CSV-Magritte/MACSVWriter.class.st
index 525a956..b9aefa8 100644
--- 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 }