element := arrow element.

This is very odd line, why do you do this? You don't ask line shapes for elements, because they have none, they are edges.


Didn't you mean to write this instead?

arrow := RTArrowedLine new
                color: trans color;
                withOffsetIfMultiple.
edge := arrow edgeFrom: efrom to: eto.

 

Gives me:

RTElement(Object)>>doesNotUnderstand: #to
RTShorterDistanceWithOffsetAttachPoint(RTAbstractShorterDistanceAttachPoint)>>basicStartingPointOf:
RTShorterDistanceWithOffsetAttachPoint>>basicStartingPointOf:
RTShorterDistanceWithOffsetAttachPoint(RTAttachPoint)>>startingPointOf:
RTLine(RTAbstractLine)>>updateFor:trachelShape:
RTLine(RTShape)>>trachelShapeFor:
RTArrowedLine>>trachelShapeFor:
RTElement(RTShapedObject)>>addShape:
RTArrowedLine(RTShape)>>element
LRPProgramVisualization>>buildTransition:withElements:forView:


---> Save our in-boxes! http://emailcharter.org <---

Johan Fabry   -   http://pleiad.cl/~jfabry
PLEIAD and RyCh labs  -  Computer Science Department (DCC)  -  University of Chile

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