diff --git a/src/MiniDocs/MarkupFile.class.st b/src/MiniDocs/MarkupFile.class.st
index e4010e0..cea9145 100644
--- a/src/MiniDocs/MarkupFile.class.st
+++ b/src/MiniDocs/MarkupFile.class.st
@@ -11,13 +11,13 @@ Class {
 }
 
 { #category : #persistence }
-MarkupFile class >> exportAsFileOn: aFileReferenceOrFileName containing: object [
+MarkupFile class >> exportAsFileOn: aFileReferenceOrFileName containing: aString [
 	| file |
 	file := aFileReferenceOrFileName asFileReference.
 	file ensureDelete.
 	file exists ifFalse: [ file ensureCreateFile ].
 	file writeStreamDo: [ :stream |
-		stream nextPutAll: (STON toStringPretty: object) withInternetLineEndings].
+		stream nextPutAll: ( aString ) withInternetLineEndings].
 	self inform: 'Exported as: ', String cr, file fullName.
 	^ file 
 ]