status bar in Mondrian

> Hi!
>
> Just to share the result of a small coding session :-)
> You can now easily define a status bar using the Mondrian builder.
>
> -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
> view interaction statusBar: [ :aClass | aClass name, ' <| ', aClass superclass name ].
> view shape rectangle size: 10.
> view nodes: (Collection withAllSubclasses).
> view edgesFrom: #superclass.
> view treeLayout.
> -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
>
> Another example:
> -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
> view interaction statusBar: #name.
> view shape rectangle size: 10.
> view nodes: (Collection withAllSubclasses).
>
> view interaction statusBar: [ :aClass | aClass name, ' <| ', aClass superclass name ].
> view edgesFrom: #superclass.
> view treeLayout.
> -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
> <Screen Shot 2013-05-31 at 12.14.23 PM.png>
>
> Cheers
> Alexandre & Juraj
>
> --
> _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
> Alexandre Bergel  http://www.bergel.eu
> ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
>
>
>
> _______________________________________________
> Moose-dev mailing list
> [hidden email]
> https://www.iam.unibe.ch/mailman/listinfo/moose-dev

> Just realized somethign in Pharo 3.0 prevented me from saving.
> these examples do not work right now. They will very soon.
>
> Cheers,
> Alexandre
>
>
> On May 31, 2013, at 12:15 PM, Alexandre Bergel <[hidden email]> wrote:
>
>> Hi!
>>
>> Just to share the result of a small coding session :-)
>> You can now easily define a status bar using the Mondrian builder.
>>
>> -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
>> view interaction statusBar: [ :aClass | aClass name, ' <| ', aClass superclass name ].
>> view shape rectangle size: 10.
>> view nodes: (Collection withAllSubclasses).
>> view edgesFrom: #superclass.
>> view treeLayout.
>> -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
>>
>> Another example:
>> -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
>> view interaction statusBar: #name.
>> view shape rectangle size: 10.
>> view nodes: (Collection withAllSubclasses).
>>
>> view interaction statusBar: [ :aClass | aClass name, ' <| ', aClass superclass name ].
>> view edgesFrom: #superclass.
>> view treeLayout.
>> -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
>> <Screen Shot 2013-05-31 at 12.14.23 PM.png>
>>
>> Cheers
>> Alexandre & Juraj
>>
>> --
>> _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
>> Alexandre Bergel  http://www.bergel.eu
>> ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
>>
>>
>>
>> _______________________________________________
>> Moose-dev mailing list
>> [hidden email]
>> https://www.iam.unibe.ch/mailman/listinfo/moose-dev
>
> --
> _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
> Alexandre Bergel  http://www.bergel.eu
> ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
>
>
>
>
> _______________________________________________
> Moose-dev mailing list
> [hidden email]
> https://www.iam.unibe.ch/mailman/listinfo/moose-dev