Hi Antoine,
Thanks for the bug report.
Indeed, there should be a returned placeholder, but your solution
returns a collection of placeholders. I will try to look into this.
Just a note. You define the inheritance edges as:
inhEdges := view edges: elements from: #yourself toAll:
#directSubclasses.
But, if you are in a single inheritance world, you could traverse it as:
inhEdges := view edges: elements from: #superclass to: #yourself.
Cheers,
Doru
On 2 May 2009, at 13:58, Antoine Cailliau wrote:
Hi,
inhEdges := view edges: elements from: #yourself
toAll:
#directSubclasses.
This returns the viewRenderer. I modified the methods for
edges: collection from: parentBlock toAll: childBlock
| tempShape tempCollection |
tempShape := self edgeShape.
tempCollection := collection collect: [:each |
self
edges: (childBlock mondrianValue: each)
from: [:x | parentBlock value: each]
to: #yourself
using: tempShape
].
self resetDefaults.
^ tempCollection.
_______________________________________________
Moose-dev mailing list
Moose-dev(a)iam.unibe.ch
https://www.iam.unibe.ch/mailman/listinfo/moose-dev
--
www.tudorgirba.com
"Beauty is where we see it."