Debugging title underline.
This commit is contained in:
parent
cd47d22480
commit
b4f2564f67
@ -148,7 +148,7 @@ Markdeep >> contents [
|
|||||||
nextPutAll: self authorsString ; lf;
|
nextPutAll: self authorsString ; lf;
|
||||||
nextPutAll: '', self version; lf;
|
nextPutAll: '', self version; lf;
|
||||||
nextPutAll: self navTop; lf; lf;
|
nextPutAll: self navTop; lf; lf;
|
||||||
nextPutAll: self body; lf; lf;
|
nextPutAll: self body; lf; lf;
|
||||||
nextPutAll: self tail; lf; lf; lf; lf;
|
nextPutAll: self tail; lf; lf; lf; lf;
|
||||||
nextPutAll: self commentsSupport.
|
nextPutAll: self commentsSupport.
|
||||||
^ output contents.
|
^ output contents.
|
||||||
@ -650,7 +650,7 @@ Markdeep >> tail: anObject [
|
|||||||
{ #category : #accessing }
|
{ #category : #accessing }
|
||||||
Markdeep >> title [
|
Markdeep >> title [
|
||||||
|
|
||||||
^ title ifNil: [ title := self metadata at: 'title' ifAbsent: [ '' ] ]
|
^ title
|
||||||
]
|
]
|
||||||
|
|
||||||
{ #category : #accessing }
|
{ #category : #accessing }
|
||||||
|
Loading…
Reference in New Issue
Block a user