[Moose-dev] Re: Mixing layout

Try this:

"Source code: ROMondrianExample>>treeLayoutOn:" "Preambule. It includes the initialization. " | view rawView | rawView := ROView new. view := ROMondrianViewBuilder view: rawView. "-------------" "-------------"

view shape rectangle size: 20. view nodes: ( Magnitude withAllSubclasses flatCollect: [ :e | e methodDict values ]) . view edgesFrom: [ :e | [e superclass] on: Exception do: [ e methodClass ] ]. view layout: ROTreeLayout .

"view edges do: [ :e | e - ROLine ]."

"-------------" "-------------" "Below is the initiation of the menu and opening the visualization" ROEaselMorphic new populateMenuOn: view. view open

Regards

Mathieu