diff --git a/src/MiniDocs/LePage.extension.st b/src/MiniDocs/LePage.extension.st index 347aa18..109076f 100644 --- a/src/MiniDocs/LePage.extension.st +++ b/src/MiniDocs/LePage.extension.st @@ -3,7 +3,7 @@ Extension { #name : #LePage } { #category : #'*MiniDocs' } LePage >> asHtmlFile [ - self asMarkdownFileWIthMetadataWrappers. + self asMarkdownFileWithMetadataWrappers. self defaultPandocTemplate exists ifFalse: [ MarkupFile installTemplate: 'https://mutabit.com/repos.fossil/mutabit/doc/trunk/plantillas/Pandoc/clean-menu-mod.html' into: self defaultPandocTemplate parent ]. @@ -62,7 +62,7 @@ LePage >> asMarkdown [ ] { #category : #'*MiniDocs' } -LePage >> asMarkdownFileWIthMetadataWrappers [ +LePage >> asMarkdownFileWithMetadataWrappers [ | folder | folder := self storage. ^ MarkupFile exportAsFileOn: folder / self markdownFileName containing: self asMarkdownWithMetadataWrappers contents @@ -316,8 +316,9 @@ LePage >> splitAdmonitionSnippets [ nodeContent := node string. nodeContent startsWithMarkdownAdmonition ifTrue: [ | snippetCommand | - snippetCommand := node splitSnippetCommandAtPosition: nodeContent admonitionEndingPosition. - snippetCommand execute + snippetCommand := node splitSnippetCommandAtPosition: nodeContent admonitionEndingPosition. + snippetCommand execute. + node tagWith: (nodeContent lines first trimBoth withoutPrefix: ':::') ] ] ] diff --git a/src/MiniDocs/LeTextSnippet.extension.st b/src/MiniDocs/LeTextSnippet.extension.st index 9beb7c3..f4fb2d8 100644 --- a/src/MiniDocs/LeTextSnippet.extension.st +++ b/src/MiniDocs/LeTextSnippet.extension.st @@ -62,7 +62,7 @@ LeTextSnippet >> parentId [ ] { #category : #'*MiniDocs' } -LeTextSnippet >> taggedWith: aString [ +LeTextSnippet >> tagWith: aString [ self tags add: aString. ]