summaryrefslogblamecommitdiff
path: root/t/07-attributes.t
blob: c4d13dda9a0c4a91c26cf700cd71864d36b4856c (plain) (tree)
1
2
3
4
5
6
7
8
9
10
11
12
13












                                                   
use strict;
use warnings;
use Test::More;

use Graph::GEXF;

my $graph = Graph::GEXF->new();
ok $graph->add_node_attribute('foo','bar','baz');
ok $graph->add_edge_attribute('baz', 'bar', 'foo');

print $graph->to_xml;

done_testing;