1 files changed, 11 insertions, 1 deletions
diff --git a/t/04-edges.t b/t/04-edges.t
index 9ded831..a1e4867 100644
--- a/t/04-edges.t
+++ b/t/04-edges.t
@@ -1,7 +1,17 @@
 use strict;
 use warnings;
+
 use Test::More;
 
-ok 1;
+use Graph::GEXF;
+
+my $graph = Graph::GEXF->new();
+
+my $n1 = $graph->add_node();
+my $n2 = $graph->add_node();
+
+$n1->link_to($n2->id);
+
+ok $n1->has_link_to($n2->id);
 
 done_testing;