Recovering headers.
This commit is contained in:
parent
977922d7a3
commit
bf0ea4b46d
@ -294,6 +294,8 @@ Markdeep >> headContents [
|
|||||||
nextPutAll: line;
|
nextPutAll: line;
|
||||||
nextPut: Character lf
|
nextPut: Character lf
|
||||||
].
|
].
|
||||||
|
stream nextPutAll:
|
||||||
|
'<st-data>', (STON toStringPretty: self metadata), '</st-data>'.
|
||||||
stream
|
stream
|
||||||
nextPutAll: '</head>';
|
nextPutAll: '</head>';
|
||||||
nextPut: Character lf.
|
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' }
|
{ #category : #'instance creation' }
|
||||||
Markdeep >> processMarkdownFor: aFileReference [
|
Markdeep >> processMarkdownFor: aFileReference [
|
||||||
"comment stating purpose of message"
|
"comment stating purpose of message"
|
||||||
|
Loading…
Reference in New Issue
Block a user