Improving Markdown importation.
This commit is contained in:
parent
655ee2e935
commit
e22eb1221d
@ -64,7 +64,10 @@ Markdown >> containsYAMLMetadataClosing [
|
||||
Markdown >> contents [
|
||||
| response |
|
||||
response := WriteStream on: ''.
|
||||
response
|
||||
response
|
||||
nextPutAll: '---'; cr;
|
||||
nextPutAll: self metadataAsYAML; cr;
|
||||
nextPutAll: '---'; cr;
|
||||
nextPutAll: self body.
|
||||
^ response contents
|
||||
]
|
||||
@ -177,7 +180,8 @@ Markdown >> file: aFileReference [
|
||||
Markdown >> fromFile: aFileReference [
|
||||
self contents: aFileReference contents.
|
||||
self file: aFileReference.
|
||||
self populateMetadata
|
||||
self populateMetadata.
|
||||
self body: self contentsWithoutYAMLMetadata
|
||||
]
|
||||
|
||||
{ #category : #'instance creation' }
|
||||
|
Loading…
Reference in New Issue
Block a user