Moving from GrafoscopioUtils.
This commit is contained in:
parent
01550c5cf9
commit
cb886d6307
@ -63,6 +63,28 @@ LeTextualSnippet >> markdownCustomOpener [
|
|||||||
^ self markdeepCustomOpener
|
^ self markdeepCustomOpener
|
||||||
]
|
]
|
||||||
|
|
||||||
|
{ #category : #'*MiniDocs' }
|
||||||
|
LeTextualSnippet >> metadata [
|
||||||
|
|
||||||
|
^ self optionAt: 'metadata' ifAbsentPut: [ self metadataInit ]
|
||||||
|
]
|
||||||
|
|
||||||
|
{ #category : #'*MiniDocs' }
|
||||||
|
LeTextualSnippet >> metadataInit [
|
||||||
|
| surrogate |
|
||||||
|
self parent
|
||||||
|
ifNil: [ surrogate := nil]
|
||||||
|
ifNotNil: [ surrogate := self parent uidString ].
|
||||||
|
^ OrderedDictionary new
|
||||||
|
at: 'id' put: self uidString;
|
||||||
|
at: 'parent' put: surrogate;
|
||||||
|
at: 'created' put: self createTime asString;
|
||||||
|
at: 'modified' put: self latestEditTime asString;
|
||||||
|
at: 'creator' put: self createEmail asString;
|
||||||
|
at: 'modifier' put: self editEmail asString;
|
||||||
|
yourself
|
||||||
|
]
|
||||||
|
|
||||||
{ #category : #'*MiniDocs' }
|
{ #category : #'*MiniDocs' }
|
||||||
LeTextualSnippet >> tags [
|
LeTextualSnippet >> tags [
|
||||||
^ self metadata at: 'tags' ifAbsentPut: [ Set new ]
|
^ self metadata at: 'tags' ifAbsentPut: [ Set new ]
|
||||||
|
Loading…
Reference in New Issue
Block a user