Children!
This commit is contained in:
parent
ca8d58f851
commit
bb9dda9eef
@ -552,7 +552,9 @@ GrafoscopioNewNotebook >> initializeWidgets [
|
|||||||
body autoAccept: true.
|
body autoAccept: true.
|
||||||
links := self newTextInput.
|
links := self newTextInput.
|
||||||
tree := self newTreeTable.
|
tree := self newTreeTable.
|
||||||
tree addColumn: (SpStringTableColumn evaluated: #title).
|
tree
|
||||||
|
addColumn: (SpStringTableColumn evaluated: #title);
|
||||||
|
children: [ : node | node children ].
|
||||||
" tree
|
" tree
|
||||||
childrenBlock: [ :node | node children value ];
|
childrenBlock: [ :node | node children value ];
|
||||||
displayBlock: [ :node | node title value ]."
|
displayBlock: [ :node | node title value ]."
|
||||||
@ -560,8 +562,7 @@ GrafoscopioNewNotebook >> initializeWidgets [
|
|||||||
add: tree;
|
add: tree;
|
||||||
add: header;
|
add: header;
|
||||||
add: body;
|
add: body;
|
||||||
add: links.
|
add: links
|
||||||
|
|
||||||
]
|
]
|
||||||
|
|
||||||
{ #category : #persistence }
|
{ #category : #persistence }
|
||||||
|
Loading…
Reference in New Issue
Block a user