Subject: | Node not connected in layout |
Date: | Tue, 7 Aug 2007 19:45:54 +0200 |
To: | bug-Graph-Easy [...] rt.cpan.org |
From: | "Berényi Péter" <berenyi.peter [...] gmail.com> |
Hi,
I'm using Graph:Easy v0.56 to create online graphs using SVG output
with Perl version 5.8.8 on Windows. I have found an error inthe layout
of the following graph:
graph { flow: south; } [developers] -> [functionality] [functionality]
-> [based_on] [functionality] -> [implemented_in] [functionality] ->
[implemented_by] [functionality] -> [input] [functionality] ->
[output] [developers] -> [source_file] [source_file] -> [located_in]
[developers] -> [functions] [developers] -> [bugs] [developers] ->
[actions] [developers] -> [software_has_developers]
The node called "output" dos not get connected to the node
"functionality" however it should be connected. If I remove one edge
around the node "functionality" it gets connected.
The code to display the graph is the following:
#!c:/Perl/bin/perl.exe
use Graph::Easy::Parser;
my $gtext = "graph { flow: south; } [developers] -> [functionality]
[functionality] -> [based_on]
[functionality] -> [implemented_in]
[functionality] -> [implemented_by]
[functionality] -> [input]
[functionality] -> [output]
[developers] -> [source_file]
[source_file] -> [located_in]
[developers] -> [functions]
[developers] -> [bugs]
[developers] -> [actions]
[developers] -> [software_has_developers]";
my $parser = Graph::Easy::Parser->new();
my $graph = $parser->from_text($gtext);
print "Content-type: text/xml\n\n";
print $graph->as_svg_file();
Thanks for Your help.
Regards
Peter Berenyi
--
----------------------------------------------------------------
"Minden túlsó parttal szemben
megtalálod az innensőt"
Karinthy