Grafoscopio
/
Grafoscopio
2
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Children!

This commit is contained in:
SantiagoBragagnolo 2020-02-23 00:42:36 +00:00
parent e65739d70e
commit 96a10e89fa
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
src/Grafoscopio/GrafoscopioNewNotebook.class.st
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 }