Hi,
thanks a lot, that wasn't exactly what I meant but gave me a hint. So I did

| browser |

browser := GLMTabulator new.
browser
    column: #functions;
    column: #finder.
browser transmit to: #functions; andShow:
  [ :a |
          a list
          title: 'Functions';
          display:   [:each | each ]
  ].
browser transmit
        to: #finder;
        from: #functions port: #selection;
        andShow: [ :a | a custom: (MooseFinder startOn: a)].
browser openOn: (1 to: 100).

And, Ta DAAA! The MooseFinder automagically open on the element you selected. I say automagically because "a" should be a presentation not the selected element, this is why I got stuck in the first place. I could figure out how to reached the object selected in the other panel and pass it to MooseFinder.

Anyway, thanks again.

Cheers,
Fabrizio


2012/3/27 Ben Coman <btc@openinworld.com>
Fabrizio Perin wrote:
Hi,
I was wondering how to open a MooseFinder on an element selected in another
browser. I tried something like this:

browser := GLMTabulator new.
   browser
       column: #functions;
       column:#finder.
   browser transmit
       to: #functions;
       andShow: [ :a |
           a list
           title: 'Functions';
           display: [:each | each ]].
   browser transmit
       to: #finder;
       from: #functions;
       andShow: [ :a |
           a finder
               title: [:each | each mooseName];
               .....
   ^ browser

but I don't know how to proceed (this is why I added the dots).

Any suggestion? Am I doing it the wrong way?

Cheers,
Fabrizio

 
Try this from Workspace?

| browser finder |
browser := GLMTabulator new.
finder := GLMFinder new.

finder show: [:a | a list display: [ :x | 1 to: x ]].


browser
    column: #functions;
    column: #finder.
browser transmit to: #functions; andShow:
  [ :a |
          a list
          title: 'Functions';
          display:   [:each | each ]
  ].
browser transmit to: #finder; from: #functions; andShow:       [ :a |
      a custom: finder
  ].
browser openOn: (1 to: 100).

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