Offray/MiniDocs
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Regression for Tiddlers exportation in friendly format corrected.

Browse Source
This commit is contained in:
Offray Vladimir Luna Cárdenas 2024-03-23 09:36:14 -05:00
parent 655ee2e935
commit 494bfc76a7
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/MiniDocs/MarkupFile.class.st
View File

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