[Moose-dev] Adding edges in Mondrian

Hi All, Several time I saw the need to add a particular edge between two nodes that I know. I added a new method addEdgeFrom:to: in ViewRenderer. Here the appropriate test. Feel free to comment. -=-=-=-=-=-=-=-=-=-=-=-= testAddEdge | view | view := MOViewRenderer new. view nodes: (1 to: 2). view addEdgeFrom: 1 to: 2. window := view open. self assert: (view root edges size = 1). self assert: (view root edges first source = (view nodeForDomainValue: 1)). self assert: (view root edges first target = (view nodeForDomainValue: 2)). -=-=-=-=-=-=-=-=-=-=-=-= Cheers, Alexandre -- _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: Alexandre Bergel http://www.bergel.eu ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.