From cb886d63070bd96dbf70d82cab88eaf83e4f586c Mon Sep 17 00:00:00 2001
From: Offray <offray.luna@mutabit.com>
Date: Wed, 21 Sep 2022 12:37:50 -0500
Subject: [PATCH] Moving from GrafoscopioUtils.

---
 src/MiniDocs/LeTextualSnippet.extension.st | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)

diff --git a/src/MiniDocs/LeTextualSnippet.extension.st b/src/MiniDocs/LeTextualSnippet.extension.st
index 1cc9be1..8f8e9c3 100644
--- a/src/MiniDocs/LeTextualSnippet.extension.st
+++ b/src/MiniDocs/LeTextualSnippet.extension.st
@@ -63,6 +63,28 @@ LeTextualSnippet >> markdownCustomOpener [
 	^ 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' }
 LeTextualSnippet >> tags [
 	^ self metadata at: 'tags' ifAbsentPut: [ Set new ]