diff --git a/repository/Grafoscopio-Utils/LeTextualSnippet.extension.st b/repository/Grafoscopio-Utils/LeTextualSnippet.extension.st index d8272b2..fb3b545 100644 --- a/repository/Grafoscopio-Utils/LeTextualSnippet.extension.st +++ b/repository/Grafoscopio-Utils/LeTextualSnippet.extension.st @@ -5,28 +5,6 @@ LeTextualSnippet >> childrenIds [ ^ self children collect: [ :each | each uidString ] ] -{ #category : #'*Grafoscopio-Utils-Core' } -LeTextualSnippet >> metadata [ - - ^ self optionAt: 'metadata' ifAbsentPut: [ self metadataInit ] -] - -{ #category : #'*Grafoscopio-Utils-Core' } -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 : #'*Grafoscopio-Utils-Core' } LeTextualSnippet >> options [ ^ options