Grafoscopio notebooks exported as Lepiter pages.

This commit is contained in:
Offray Vladimir Luna Cárdenas 2023-01-26 20:55:47 -05:00
parent a5a01e7ca6
commit ed211f2fb8
2 changed files with 4 additions and 3 deletions

View File

@ -35,6 +35,7 @@ GrafoscopioNode >> ancestors [
{ #category : #accessing } { #category : #accessing }
GrafoscopioNode >> asLePage [ GrafoscopioNode >> asLePage [
| page | | page |
self root populateTimestamps.
page := LePage new page := LePage new
initializeTitle: 'Grafoscopio Notebook (imported)'. initializeTitle: 'Grafoscopio Notebook (imported)'.
self nodesInPreorder allButFirst do: [:node | self nodesInPreorder allButFirst do: [:node |

View File

@ -132,7 +132,7 @@ Markdeep >> contents [
output := '' writeStream. output := '' writeStream.
output output
nextPutAll: self headContents; lf; lf; nextPutAll: self headContents; lf; lf;
nextPutAll: ' **', self title, '**'; lf; nextPutAll: ' **', self title trimmed, '**'; lf;
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;