Extension { #name : #LeTextSnippet }

{ #category : #'*Grafoscopio-Utils-Core' }
LeTextSnippet >> contentFrom: markdeepDiv [
	| sanitized |
	sanitized := markdeepDiv contentString.
	sanitized :=  sanitized allButFirst.
	sanitized := sanitized allButLast.
	self string: sanitized.
]

{ #category : #'*Grafoscopio-Utils-Core' }
LeTextSnippet >> metadata [

	^ self optionAt: 'metadata' ifAbsentPut: [ self metadataInit ]
]

{ #category : #'*Grafoscopio-Utils-Core' }
LeTextSnippet >> metadataInit [

	^ OrderedDictionary new
		  at: 'id' put: self uidString;
		  at: 'parent' put: self parentId;
		  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' }
LeTextSnippet >> options [
	^ options
]

{ #category : #'*Grafoscopio-Utils-Core' }
LeTextSnippet >> parentId [
	self parent ifNil: [ ^ self ].
	^ self parent uidString. 
]