Fixing http://mutabit.com/repos.fossil/grafoscopio/tktview?name=ffb08a5973 as suggested by Udo.
This commit is contained in:
parent
7f3450184d
commit
20bb08e412
@ -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
|
||||
|
||||
|
||||
]
|
||||
|
||||
{ #category : #accessing }
|
||||
|
Loading…
Reference in New Issue
Block a user