> thanks yuri
> Now I would like the shape not to be influenced by the text.

view shape withoutBorder.
view nodes: packageGroup forEach: [ :pak |
        view shape label text: [:p | (MalKontractor toSize: 4) reduce: p name ] .
        view interaction forward.
        view node: pak.

        view shape rectangle size: pak numberOfClasses.
        view interaction forward.
        view node: pak.

        view verticalLineLayout.
].
view gridLayout.

Alexandre

>
> So far I have the impression that I should spend a month or two to build
> my own tools and this depressed me so much….
>
> Stef
>
> On Dec 7, 2013, at 7:23 PM, Yuriy Tymchuk <yuriy.tymchuk@me.com> wrote:
>
>>
>> On 07 Dec 2013, at 19:06, Stéphane Ducasse <stephane.ducasse@inria.fr> wrote:
>>
>>> Ok but my script (which does not work is
>>>
>>> view shape rectangle size: [:each | each classes size * 5 ].
>>> view shape withCenteredText: [:each | (MalKontractor reduce: each name upTo: 8) ].
>>> view nodes: packageGroup.
>>> view gridLayout
>>>
>>>
>>> how do I turn that in roassal.
>>>
>>> Where can I find an example?
>>> Is there a roassal easel? or is the roassal easel bot for mondrian and roassal?
>>
>> Oh, ok.
>>
>> rawView := view raw.
>> rawView addAll: (ROElement forCollection: packageGroup).
>>
>> rawView elements do: [ :el |
>> el size: el model classes size * 5.
>> el + ROBorder.
>> el + (ROCenteredLabel text: [ MalKontractor reduce: el model name upTo: 8 ]) ].
>>
>> ROGridLayout on: rawView elements.
>>
>>> _______________________________________________
>>> Moose-dev mailing list
>>> Moose-dev@iam.unibe.ch
>>> https://www.iam.unibe.ch/mailman/listinfo/moose-dev
>>
>>
>> _______________________________________________
>> Moose-dev mailing list
>> Moose-dev@iam.unibe.ch
>> https://www.iam.unibe.ch/mailman/listinfo/moose-dev
>
>
> _______________________________________________
> Moose-dev mailing list
> Moose-dev@iam.unibe.ch
> https://www.iam.unibe.ch/mailman/listinfo/moose-dev


_______________________________________________
Moose-dev mailing list
Moose-dev@iam.unibe.ch
https://www.iam.unibe.ch/mailman/listinfo/moose-dev