Children!

This commit is contained in:
Santiago Bragagnolo 2020-02-23 00:42:36 +00:00 committed by Offray Luna
parent ca8d58f851
commit bb9dda9eef

View File

@ -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 }