finder improvements

> aComposite text
> title: 'Source';
> titleIcon: MenuIcons mooseSourceText;
> display: [ :each | each mooseInterestingEntity sourceText ];
> when: [ :input | (input mooseInterestingEntity class canUnderstand: #sourceText)
> and: [input mooseInterestingEntity sourceText notEmpty ] ]
>
> - I added icons for the default presentations (see attached picture)
>
> Cheers,
> Doru
>
> --
> www.tudorgirba.com
>
> "From an abstract enough point of view, any two things are similar."
>
>
> <Moose Panel.png>_______________________________________________
> Moose-dev mailing list
> [hidden email]
> https://www.iam.unibe.ch/mailman/listinfo/moose-dev

>> - You can now extend it with new presentations by adding a method  
>> in the Finder with a pragma like:
>>
>> sourceTextIn: aComposite
>> <presentation: 10>
>
> What the 10 means? It kind a priority ?
>
> Alexandre
>
>> aComposite text
>> title: 'Source';
>> titleIcon: MenuIcons mooseSourceText;
>> display: [ :each | each mooseInterestingEntity sourceText ];
>> when: [ :input | (input mooseInterestingEntity class  
>> canUnderstand: #sourceText)
>> and: [input mooseInterestingEntity sourceText notEmpty ] ]
>>
>> - I added icons for the default presentations (see attached picture)
>>
>> Cheers,
>> Doru
>>
>> --
>> www.tudorgirba.com
>>
>> "From an abstract enough point of view, any two things are similar."
>>
>>
>> <Moose Panel.png>_______________________________________________
>> 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