Grafoscopio notebooks exported as Lepiter pages.
This commit is contained in:
parent
a5a01e7ca6
commit
ed211f2fb8
@ -35,6 +35,7 @@ GrafoscopioNode >> ancestors [
|
||||
{ #category : #accessing }
|
||||
GrafoscopioNode >> asLePage [
|
||||
| page |
|
||||
self root populateTimestamps.
|
||||
page := LePage new
|
||||
initializeTitle: 'Grafoscopio Notebook (imported)'.
|
||||
self nodesInPreorder allButFirst do: [:node |
|
||||
|
@ -41,7 +41,7 @@ Markdeep >> authors [
|
||||
{ #category : #'instance creation' }
|
||||
Markdeep >> authorsString [
|
||||
self authors
|
||||
ifNil: [ ^ '' ] ifNotNil: [ ^ ' ', self authors ]
|
||||
ifNil: [ ^ '' ] ifNotNil: [ ^ ' ', self authors ]
|
||||
]
|
||||
|
||||
{ #category : #accessing }
|
||||
@ -132,9 +132,9 @@ Markdeep >> contents [
|
||||
output := '' writeStream.
|
||||
output
|
||||
nextPutAll: self headContents; lf; lf;
|
||||
nextPutAll: ' **', self title, '**'; lf;
|
||||
nextPutAll: ' **', self title trimmed, '**'; lf;
|
||||
nextPutAll: self authorsString ; lf;
|
||||
nextPutAll: ' ', self version; lf;
|
||||
nextPutAll: '', self version; lf;
|
||||
nextPutAll: self navTop; lf; lf;
|
||||
nextPutAll: self body; lf; lf;
|
||||
nextPutAll: self tail; lf; lf; lf; lf;
|
||||
|
Loading…
Reference in New Issue
Block a user