diff --git a/repository/Grafoscopio-Utils/LePage.extension.st b/repository/Grafoscopio-Utils/LePage.extension.st
index f1d15cc..66f7f32 100644
--- a/repository/Grafoscopio-Utils/LePage.extension.st
+++ b/repository/Grafoscopio-Utils/LePage.extension.st
@@ -34,10 +34,10 @@ LePage >> asMarkdeepInto: aFileLocator [
 ]
 
 { #category : #'*Grafoscopio-Utils-Core' }
-LePage >> detectSnippetWithUid: uidString [
+LePage >> detectParentSnippetWithUid: uidString [
 	"Answer a boolean indicating whether the supplied uid is present"
 
-	^ self preorderTraversal detect: [ :snippet | snippet uidString = uidString ] ifNone: [ ^ nil ] 
+	^ self preorderTraversal detect: [ :snippet | snippet uidString = uidString ] ifNone: [ ^ self ] 
 ]
 
 { #category : #'*Grafoscopio-Utils-Core' }
@@ -101,13 +101,13 @@ LePage >> options [
 
 { #category : #'*Grafoscopio-Utils-Core' }
 LePage >> populateChildrenFrom: docTreeDivs [ 
-	docTreeDivs doWithIndex: [:div :i | | snippetTemp "parent surrogate" |
+	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."
+		parent := self detectParentSnippetWithUid: (snippetTemp metadata at: 'parent').
+		parent snippetBuilder snippet: snippetTemp; add.
+		"parent := self snippetBuilder snippet: surrogate."
 	]
 ]