From 109c0d07d7d2ee792b197dffa8c201ed0d7488d7 Mon Sep 17 00:00:00 2001
From: doy <doy@tozt.net>
Date: Sat, 7 Feb 2009 14:35:28 -0500
Subject: oops, edge calculator should return a list, not an arrayref

---
 t/003-minimum-spanning-tree.t | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 't')

diff --git a/t/003-minimum-spanning-tree.t b/t/003-minimum-spanning-tree.t
index 8f34cf1..f8192df 100644
--- a/t/003-minimum-spanning-tree.t
+++ b/t/003-minimum-spanning-tree.t
@@ -62,7 +62,7 @@ my %mst = (
 );
 my $edge_calculator = sub {
     my $vertex = shift;
-    return $graph{$vertex};
+    return @{ $graph{$vertex} };
 };
 
 my $graph = Graph::Implicit->new($edge_calculator);
-- 
cgit v1.2.3-54-g00ecf