[Moose-dev] Re: Roassal: is there an example how to add a name to any shape?

• how do I say that I want the text from the node?
• how can I get the Konkrator used?

Without Kontraktor: -=-=-=-=-=-=-=-=-=-= | rawView view | rawView := ROView new. view := ROMondrianViewBuilder view: rawView.

view shape rectangle withText. view nodes: Collection withAllSubclasses. view edgesFrom: #superclass. view treeLayout.

view open -=-=-=-=-=-=-=-=-=-=

With Kontraktor: -=-=-=-=-=-=-=-=-=-= | rawView view k | rawView := ROView new. view := ROMondrianViewBuilder view: rawView.

k := MalKontractor toSize: 10. view shape rectangle withText: [:cls | k reduce: cls name ]. view nodes: Collection withAllSubclasses. view edgesFrom: #superclass. view treeLayout.

view open -=-=-=-=-=-=-=-=-=-=