Grafoscopio notebooks exported as Lepiter pages in temporal directory.
This commit is contained in:
parent
ed211f2fb8
commit
b67df075b1
@ -39,8 +39,8 @@ GrafoscopioNode >> asLePage [
|
||||
page := LePage new
|
||||
initializeTitle: 'Grafoscopio Notebook (imported)'.
|
||||
self nodesInPreorder allButFirst do: [:node |
|
||||
page addSnippet: node asSnippet .
|
||||
].
|
||||
page addSnippet: node asSnippet ].
|
||||
page editTime: self root latestEditionDate.
|
||||
^ page.
|
||||
]
|
||||
|
||||
@ -49,7 +49,8 @@ GrafoscopioNode >> asSnippet [
|
||||
| snippet child |
|
||||
snippet := LeTextSnippet new
|
||||
string: self header;
|
||||
createTime: self created;
|
||||
createTime: (LeTime new
|
||||
time: self created);
|
||||
uid: LeUID new.
|
||||
(self tags includes: 'código')
|
||||
ifFalse: [
|
||||
@ -59,7 +60,8 @@ GrafoscopioNode >> asSnippet [
|
||||
child := LePharoSnippet new;
|
||||
code: self body ].
|
||||
child
|
||||
createTime: self created;
|
||||
createTime: (LeTime new
|
||||
time: self created);
|
||||
uid: LeUID new.
|
||||
snippet addFirstSnippet: child.
|
||||
snippet optionAt: 'tags' put: self tags.
|
||||
|
6
src/MiniDocs/LeNullDatabase.extension.st
Normal file
6
src/MiniDocs/LeNullDatabase.extension.st
Normal file
@ -0,0 +1,6 @@
|
||||
Extension { #name : #LeNullDatabase }
|
||||
|
||||
{ #category : #'*MiniDocs' }
|
||||
LeNullDatabase >> attachmentsDirectory [
|
||||
^ (FileLocator temp / 'lepiter' / 'attachments') ensureCreateDirectory.
|
||||
]
|
Loading…
Reference in New Issue
Block a user