GrafoscopioUtils/repository/Grafoscopio-Utils/LePage.extension.st

17 lines
493 B
Smalltalk
Raw Normal View History

Extension { #name : #LePage }
{ #category : #'*Grafoscopio-Utils-Core' }
LePage >> asMarkdeepInto: aFileLocator [
self preorderTraversal
]
{ #category : #'*Grafoscopio-Utils-Core' }
LePage >> populateChildrenFrom: docTreeDivs [
docTreeDivs doWithIndex: [:div :i | | snippetTemp parent "surrogate" |
snippetTemp := LeSnippet fromMetaMarkdeep:div.
parent := self detectParentSnippetWithUid: (snippetTemp metadata at: 'parent').
parent snippetBuilder snippet: snippetTemp; add.
]
]