diff options
Diffstat (limited to 't/05-basic_graph.t')
-rw-r--r-- | t/05-basic_graph.t | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/t/05-basic_graph.t b/t/05-basic_graph.t new file mode 100644 index 0000000..ed1a921 --- /dev/null +++ b/t/05-basic_graph.t @@ -0,0 +1,20 @@ +use strict; +use warnings; +use Test::More; + +use Graph::GEXF; + +my $graph = Graph::GEXF->new(); + +my $n1 = $graph->add_node; +$n1->label('hello'); + +my $n2 = $graph->add_node; +$n2->label('world'); + +$n1->link_to($n2->id); + +ok my $xml = $graph->to_xml; +#print $xml; + +done_testing; |