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