The issue is that Set allSubclasses does not return a
tree. Use Set withAllSubclasses, and you will get a tree.
Doru
On 25 May 2011, at 15:28, Stéphane Ducasse wrote:
apparently the problem is due to the fact that
there is a second dot in the script
On May 25, 2011, at 3:25 PM, Stéphane Ducasse wrote:
view shape rectangle size: 20.
view interaction action: #inspect.
view interaction
whenEnteringUpdateNode: [:node | view interaction forwarder.
view nodes: (Set allSubclasses).
view interaction forwarder.
view edgesFrom: #superclass. .
^^^^
view treeLayout ]
whenLeavingUpdateNode: [:node | ] withLayoutUpdate: true.
view nodes: (1 to: 3)
I removed it when I copied and pasted the mail.
when I try this example I do not see the tree
representing subclasses.
Stef
_______________________________________________
Moose-dev mailing list
Moose-dev(a)iam.unibe.ch
https://www.iam.unibe.ch/mailman/listinfo/moose-dev
_______________________________________________
Moose-dev mailing list
Moose-dev(a)iam.unibe.ch
https://www.iam.unibe.ch/mailman/listinfo/moose-dev
"What we can governs what we wish."
_______________________________________________
Moose-dev mailing list
Moose-dev(a)iam.unibe.ch