diff options
Diffstat (limited to 't/01-basic.t')
| -rw-r--r-- | t/01-basic.t | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/t/01-basic.t b/t/01-basic.t new file mode 100644 index 0000000..8e1a231 --- /dev/null +++ b/t/01-basic.t @@ -0,0 +1,12 @@ +use strict; +use warnings; +use Test::More; +use Graph::GEXF; + +ok my $graph = Graph::GEXF->new(), 'graph created'; +ok my $n1 = $graph->add_node(), 'node created'; +ok $n1->id, 'node has an id'; +is $graph->total_nodes, 1, 'got one node'; +ok my $n2 = $graph->get_node($n1->id); + +done_testing; |
