Migrating from GrafoscopioUtils.
This commit is contained in:
parent
c453132530
commit
2989ba0986
@ -113,6 +113,19 @@ LePage >> metadata [
|
||||
^ self options at: 'metadata' ifAbsentPut: [ self metadataInit]
|
||||
]
|
||||
|
||||
{ #category : #'*MiniDocs' }
|
||||
LePage >> metadataInit [
|
||||
|
||||
^ OrderedDictionary new
|
||||
at: 'id' put: self uidString;
|
||||
at: 'title' put: self contentAsString;
|
||||
at: 'created' put: self createTime greaseString;
|
||||
at: 'modified' put: self latestEditTime greaseString;
|
||||
at: 'creator' put: self createEmail greaseString;
|
||||
at: 'modifier' put: self editEmail greaseString;
|
||||
yourself
|
||||
]
|
||||
|
||||
{ #category : #'*MiniDocs' }
|
||||
LePage >> options [
|
||||
^ options
|
||||
|
Loading…
Reference in New Issue
Block a user