Minor renaming and tagging while splitting the document.

This commit is contained in:
Offray Vladimir Luna Cárdenas 2024-11-17 12:19:39 -05:00
parent e73cbbb72a
commit 92760a54a9
2 changed files with 6 additions and 5 deletions

View File

@ -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: ':::')
]
]
]

View File

@ -62,7 +62,7 @@ LeTextSnippet >> parentId [
]
{ #category : #'*MiniDocs' }
LeTextSnippet >> taggedWith: aString [
LeTextSnippet >> tagWith: aString [
self tags add: aString.
]