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

Debugging of STON pretty print started.

Browse Source
This commit is contained in:
Offray Vladimir Luna Cárdenas 2024-02-04 19:24:08 -05:00
parent 3699111416
commit fe57ba9497
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -17,7 +17,7 @@ MarkupFile class >> exportAsFileOn: aFileReferenceOrFileName containing: object
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) withUnixLineEndings]. stream nextPutAll: (STON toStringPretty: object) withInternetLineEndings].
self inform: 'Exported as: ', String cr, file fullName. self inform: 'Exported as: ', String cr, file fullName.
^ file ^ file
] ]

2
src/MiniDocs/MiniDocs.class.st
View File

@ -45,7 +45,7 @@ MiniDocs class >> appFolder [
{ #category : #accessing } { #category : #accessing }
MiniDocs class >> exportAsSton: anObject on: aFileReference [ MiniDocs class >> exportAsSton: anObject on: aFileReference [
MarkupFile exportAsFileOn: aFileReference containing: (STON toStringPretty: anObject) MarkupFile exportAsFileOn: aFileReference containing: (STON toStringPretty: anObject) withInternetLineEndings
] ]
{ #category : #accessing } { #category : #accessing }