Debugging.

This commit is contained in:
ruidajo 2022-10-07 14:37:56 -05:00
parent 00112aadeb
commit a350b58d55

View File

@ -25,8 +25,10 @@ LeDatabase >> addPageFromMarkdeep: markdeepDocTree [
snippets do: [ :snippet | page addSnippet: snippet ].
page children collect: [ :snippet |
(self hasBlockUID: (snippet uid))
ifTrue: [ ^ self pages detect: [ :pageTemp |
pageTemp includesSnippetUid: snippet uid ] ]
ifTrue: [ | existingPage |
existingPage := self pages detect: [ :pageTemp |
pageTemp includesSnippetUid: snippet uid ].
^ self importErrorMessage: existingPage. ]
ifFalse: [
snippet database: self.
self registerSnippet: snippet ] ].