Offray/Grafoscopio
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

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

Browse Source
This commit is contained in:
Offray Vladimir Luna Cárdenas 2017-01-08 13:23:25 +00:00
parent 7f3450184d
commit 20bb08e412
1 changed files with 3 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
repository/Grafoscopio/GrafoscopioNode.class.st
View File

@ -126,14 +126,12 @@ GrafoscopioNode >> ancestors [
currentNode := self. currentNode := self.
ancestors := OrderedCollection new. ancestors := OrderedCollection new.
[currentNode level > 0] [ currentNode parent notNil and: [ currentNode level > 0 ] ]
whileTrue: [ whileTrue: [
ancestors add: currentNode parent. ancestors add: currentNode parent.
currentNode := currentNode parent.]. currentNode := currentNode parent].
ancestors := ancestors reversed. ancestors := ancestors reversed.
^ ancestors ^ ancestors
] ]
{ #category : #accessing } { #category : #accessing }