diff --git a/src/Grafoscopio/GrafoscopioNewNotebook.class.st b/src/Grafoscopio/GrafoscopioNewNotebook.class.st index 9d8e4f7..a884fdb 100644 --- a/src/Grafoscopio/GrafoscopioNewNotebook.class.st +++ b/src/Grafoscopio/GrafoscopioNewNotebook.class.st @@ -552,7 +552,9 @@ GrafoscopioNewNotebook >> initializeWidgets [ body autoAccept: true. links := self newTextInput. tree := self newTreeTable. - tree addColumn: (SpStringTableColumn evaluated: #title). + tree + addColumn: (SpStringTableColumn evaluated: #title); + children: [ : node | node children ]. " tree childrenBlock: [ :node | node children value ]; displayBlock: [ :node | node title value ]." @@ -560,8 +562,7 @@ GrafoscopioNewNotebook >> initializeWidgets [ add: tree; add: header; add: body; - add: links. - + add: links ] { #category : #persistence }