Several strange behavior in Roassal on a fresh moose 7.1 image (the
behavior with moose 6.1).
The following script tries to show classes within their packages, with
color according to their numberOfLinesOfCode:
|model v|
model := MooseModel root allModels last.
v := RTMondrian new.
v shape rectangle.
v nodes: (model allModelNamespaces)
forEach: [ :p |
v shape rectangle.
v nodes: p types.
v normalizer
normalizeColor: #numberOfLinesOfCode
using: {Color white . Color black}
min: 0
max: 1000.
v layout grid.
].
v layout grid.
v
The result is that package color changes, not class color:
Now let's add the name of the packages (same script but for the 4th line):
|model v|
model := MooseModel root allModels last.
v := RTMondrian new.
v shape rectangle withTextAbove: #mooseName.
v nodes: (model allModelNamespaces)
forEach: [ :p |
v shape rectangle.
v nodes: p types.
v normalizer
normalizeColor: #numberOfLinesOfCode
using: {Color white . Color black}
min: 0
max: 1000.
v layout grid.
].
v layout grid.
v
The result is that packages are not colored anymore but package names are :
So the question is:
What's wrong ?
How to have package with text above in black and color of inner class
depending on their numberOfLinesOfCode ?
thanks
nicolas
--
Nicolas Anquetil
RMod team -- Inria Lille