Supporting proper line break for YAML metada blocks.

This commit is contained in:
Offray Vladimir Luna Cárdenas 2017-12-01 17:58:08 +00:00 committed by SantiagoBragagnolo
parent 29b6b23f21
commit ecb43dd7f9
1 changed files with 3 additions and 3 deletions

View File

@ -248,12 +248,12 @@ GrafoscopioNotebook >> exportNode: aGrafoscopioNode asMarkdownIn: aFile [
writeStreamDo: [:stream |
stream
nextPutAll:
'---', String cr,
'exportedFrom: ', self checksum, String cr.
('---', String cr,
'exportedFrom: ', self checksum, String cr) withInternetLineEndings.
aGrafoscopioNode metadataAsYamlIn: stream.
stream
nextPutAll:
'---', String cr, String cr,
('---', String cr, String cr) withInternetLineEndings,
aGrafoscopioNode asMarkdown ].
self inform: 'Exported as: ', String cr, aFile fullName
]