Fixing http://mutabit.com/repos.fossil/grafoscopio/tktview?name=ffb08a5973 as suggested by Udo.

2017-01-08 13:23:25 +00:00 · 2017-01-08 13:23:25 +00:00 · 20bb08e412
parent 7f3450184d
commit 20bb08e412
1 changed files with 3 additions and 5 deletions
--- a/repository/Grafoscopio/GrafoscopioNode.class.st
+++ b/repository/Grafoscopio/GrafoscopioNode.class.st
@ -126,14 +126,12 @@ GrafoscopioNode >> ancestors [
 	
 	currentNode := self.
 	ancestors := OrderedCollection new.
-	[currentNode level > 0] 
+	[ currentNode parent notNil and: [ currentNode level > 0 ] ]
 		whileTrue: [ 
 			ancestors add: currentNode parent.
-			currentNode := currentNode parent.].
+			currentNode := currentNode parent].
 	ancestors := ancestors reversed.
-   ^ ancestors 	
-	
-
+   ^ ancestors 
 ]

 { #category : #accessing }