From 8253f8332095128d312759cdf13398dbfa1aadc8 Mon Sep 17 00:00:00 2001
From: doy <doy@tozt.net>
Date: Mon, 15 Dec 2008 02:32:18 -0500
Subject: oops, need to add the edge here, not the vertex

---
 lib/Graph/Implicit.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/Graph/Implicit.pm b/lib/Graph/Implicit.pm
index 9c07d73..28605bd 100644
--- a/lib/Graph/Implicit.pm
+++ b/lib/Graph/Implicit.pm
@@ -82,7 +82,7 @@ sub _traversal {
             $code->($pred, $vertex);
             $pred{$vertex} = $pred if defined wantarray;
             $marked{$vertex} = 1;
-            $insert->(\@bag, $_) for $self->neighbors($vertex);
+            $insert->(\@bag, [$vertex, $_]) for $self->neighbors($vertex);
         }
     }
     return \%pred;
-- 
cgit v1.2.3-54-g00ecf