Improving Grafoscopio/Lepiter import and export.
This commit is contained in:
parent
b67df075b1
commit
0b66b7513c
@ -40,7 +40,8 @@ GrafoscopioNode >> asLePage [
|
||||
initializeTitle: 'Grafoscopio Notebook (imported)'.
|
||||
self nodesInPreorder allButFirst do: [:node |
|
||||
page addSnippet: node asSnippet ].
|
||||
page editTime: self root latestEditionDate.
|
||||
page latestEditTime: self root latestEditionDate.
|
||||
page createTime: self root earliestCreationDate.
|
||||
^ page.
|
||||
]
|
||||
|
||||
|
@ -18,8 +18,8 @@ LeDatabase >> addPageFromMarkdeep: markdeepDocTree withRemote: externalDocLocati
|
||||
createTime: (LeTime new time: (remoteMetadata at: 'created') asDateAndTime);
|
||||
editTime: (LeTime new time: (remoteMetadata at: 'modified') asDateAndTime);
|
||||
latestEditTime: (LeTime new time: (remoteMetadata at: 'modified') asDateAndTime);
|
||||
createEmail: (LeEmail new email: (remoteMetadata at: 'creator'));
|
||||
editEmail: (LeEmail new email: (remoteMetadata at: 'modifier')).
|
||||
createEmail: (remoteMetadata at: 'creator');
|
||||
editEmail: (remoteMetadata at: 'modifier').
|
||||
snippets do: [ :snippet | page addSnippet: snippet ].
|
||||
page children
|
||||
do: [ :snippet |
|
||||
|
Loading…
Reference in New Issue
Block a user