[Moose-dev] eyesee presentation vs graphET presentation

Hi, I built sometimes ago a tab in the moose panel to show an eyesee pieChart:

*viewAccessesTypesPieChartIn: composite <moosePresentationOrder: 275> composite eyesee title: 'Database accessor types'; titleIcon: MooseJEEIcons pieChart; diagram: [ :view :each | each mooseInterestingEntity viewAccessesTypesPieChartOn: view ]; when: [ :input | input mooseInterestingEntity isKindOf: FAMIXDBAccessGroup ]*

Now, if I load eyesee and the eyesee glamour presentation everything is fine, however, I would like to port this view on graphET. So, I tried:

*viewAccessesTypesPieChartIn: composite <moosePresentationOrder: 275> composite graphET title: 'Database accessor types'; titleIcon: MooseJEEIcons pieChart; diagram: [ :view :each | each mooseInterestingEntity viewAccessesTypesPieChartOn: view ]; when: [ :input | input mooseInterestingEntity isKindOf: FAMIXDBAccessGroup ]*

now the local variable *each *contains the presentation instead of the model, is that a wanted feature? If so, how can i access the model elements to invoke the view I need? Should I move the logic that implements the view?

Thanks in advance, Fabrizio