diff --git a/repository/Grafoscopio-Utils/LePage.extension.st b/repository/Grafoscopio-Utils/LePage.extension.st index e9d4792..f1d15cc 100644 --- a/repository/Grafoscopio-Utils/LePage.extension.st +++ b/repository/Grafoscopio-Utils/LePage.extension.st @@ -101,12 +101,13 @@ LePage >> options [ { #category : #'*Grafoscopio-Utils-Core' } LePage >> populateChildrenFrom: docTreeDivs [ - docTreeDivs doWithIndex: [:div :i | | snippet parent | - snippet := LeSnippet fromMetaMarkdeep:div. - self children - addSnippet: snippet beforeIndex: i. - parent := self detectSnippetWithUid: (snippet metadata at: 'parent'). - snippet parent: parent. + docTreeDivs doWithIndex: [:div :i | | snippetTemp "parent surrogate" | + snippetTemp := LeSnippet fromMetaMarkdeep:div. + "self children + addSnippet: snippet beforeIndex: i." + self snippetBuilder snippet: snippetTemp; add. + "surrogate := self detectSnippetWithUid: (snippetTemp metadata at: 'parent'). + parent := self snippetBuilder snippet: surrogate." ] ]