Retaking taging as a way to improve document export/import.

This commit is contained in:
Offray Vladimir Luna Cárdenas 2024-07-18 16:26:32 -05:00
parent 6e58c5631d
commit 6072fd8971
2 changed files with 8 additions and 3 deletions

View File

@ -61,6 +61,5 @@ LeTextSnippet >> parentId [
{ #category : #'*MiniDocs' } { #category : #'*MiniDocs' }
LeTextSnippet >> taggedWith: aString [ LeTextSnippet >> taggedWith: aString [
self metadata at: 'tags' ifPresent: [ (self metadata at: 'tags') add: aString; yourself ] ifAbsentPut: [ Set new ]. self tags add: aString.
^ self metadata at: 'tags'
] ]

View File

@ -81,6 +81,11 @@ LeTextualSnippet >> contentAsStringCustomized [
ifFalse: [ ^ self contentAsString ] ifFalse: [ ^ self contentAsString ]
] ]
{ #category : #'*MiniDocs' }
LeTextualSnippet >> extra [
^ self optionAt: 'extra' ifAbsentPut: [ Dictionary new ]
]
{ #category : #'*MiniDocs' } { #category : #'*MiniDocs' }
LeTextualSnippet >> markdeepCustomCloser [ LeTextualSnippet >> markdeepCustomCloser [
^ '' ^ ''
@ -134,6 +139,7 @@ LeTextualSnippet >> metadataUpdate [
at: 'modified' put: self latestEditTime asString; at: 'modified' put: self latestEditTime asString;
at: 'creator' put: createEmailSanitized; at: 'creator' put: createEmailSanitized;
at: 'modifier' put: editEmailSanitized; at: 'modifier' put: editEmailSanitized;
at: 'extra' put: self extra;
yourself yourself
] ]
@ -151,5 +157,5 @@ LeTextualSnippet >> sanitizeMetadata [
{ #category : #'*MiniDocs' } { #category : #'*MiniDocs' }
LeTextualSnippet >> tags [ LeTextualSnippet >> tags [
^ self metadata at: 'tags' ifAbsentPut: [ Set new ] ^ self extra at: 'tags' ifAbsentPut: [ Set new ]
] ]