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
parent 709a0f2d82
commit bebed308e2

View File

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