From 3202717cea093030f6cbea60ad3fae874f3a36a6 Mon Sep 17 00:00:00 2001 From: Offray Luna Date: Tue, 11 Jun 2024 16:12:05 -0500 Subject: [PATCH] Debugging metadata exportation. --- src/MiniDocs/LeSnippet.extension.st | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/MiniDocs/LeSnippet.extension.st b/src/MiniDocs/LeSnippet.extension.st index 13d1810..101720d 100644 --- a/src/MiniDocs/LeSnippet.extension.st +++ b/src/MiniDocs/LeSnippet.extension.st @@ -16,7 +16,7 @@ LeSnippet >> metadata [ | createEmailSanitized editEmailSanitized | createEmailSanitized := self createEmail asString withoutXMLTagDelimiters. editEmailSanitized := self editEmail asString withoutXMLTagDelimiters. - self optionAt: 'metadata' ifAbsentPut: [ ^ Dictionary new ]. + self optionAt: 'metadata' ifAbsentPut: [ Dictionary new ]. ^ (self optionAt: 'metadata') at: 'id' put: self uidString; at: 'parent' put: self parent uid asString36;