FishEye has a bug

[bergel]

Consider the example:

   |v|
    v := RTLayoutExample new exampleForce.
    v @ (RTFisheye radius: 50).
    ^ v

The zoom does not happens at the place where the mouse cursor is...

[bergel]

Another example:

b := RTMondrian new.
b nodes: (1 to: 9) forEach: [ :v |
    b nodes: (50 to: 150).
    b layout grid ].

b shape line color: Color red; withShorterDistanceAttachPoint.
b edges 
    connectFrom: [ :nb | nb + 2 // 5 ].

b layout force charge: -5000.
b view @ (RTFisheye radius: 120).
b

[akevalion]

I have update roassal with The solution for this issue, RTFisheye plays with the extent and position of the elements. But this do not interact with the pixels of this view