Recovering headers.

This commit is contained in:
Offray Vladimir Luna Cárdenas 2024-04-12 20:27:21 -05:00
parent 977922d7a3
commit bf0ea4b46d

View File

@ -294,6 +294,8 @@ Markdeep >> headContents [
nextPutAll: line;
nextPut: Character lf
].
stream nextPutAll:
'<st-data>', (STON toStringPretty: self metadata), '</st-data>'.
stream
nextPutAll: '</head>';
nextPut: Character lf.
@ -378,15 +380,6 @@ Markdeep >> options [
]
]
{ #category : #printing }
Markdeep >> printOn: aStream [
| response |
super printOn: aStream.
response := self title ifNil: [ 'Untitled' ].
aStream
nextPutAll: '( ', response, ' )'
]
{ #category : #'instance creation' }
Markdeep >> processMarkdownFor: aFileReference [
"comment stating purpose of message"