--- trunk/lib/Frey/Class/Graph.pm 2009/06/28 22:14:22 1098 +++ trunk/lib/Frey/Class/Graph.pm 2009/06/28 22:19:17 1099 @@ -164,8 +164,8 @@ foreach my $role ( keys %{ $data->{roles} } ) { next if $filter && $self->filter_roles && $role !~ m{$filter}; warn "# $class\trole\t$role\n"; - $g->add_edge( $role => $class, label => 'role', color => 'yellow' ); -# $g->add_node( $role, rank => 'role' ); + $g->add_edge( $role => $class, label => 'with', color => 'yellow' ); + $g->add_node( $role, shape => 'diamond' ); $count->{$class}++; $count->{$role}++; }