Children!
This commit is contained in:
parent
ca8d58f851
commit
bb9dda9eef
@ -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 }
|
||||
|
Loading…
Reference in New Issue
Block a user