diff options
Diffstat (limited to 'lib/Graph/Implicit.pm')
-rw-r--r-- | lib/Graph/Implicit.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Graph/Implicit.pm b/lib/Graph/Implicit.pm index 5f6d535..2fc12ab 100644 --- a/lib/Graph/Implicit.pm +++ b/lib/Graph/Implicit.pm @@ -41,7 +41,7 @@ sub dijkstra { } $neighbors{$vertex} = [$self->($vertex)] unless exists $neighbors{$vertex}; - for my $neighbor (@{ $neighbors{$vertex} })) { + for my $neighbor (@{ $neighbors{$vertex} }) { my ($vert_n, $weight_n) = @{ $neighbor }; my $dist = $cost + $weight_n; if (!defined $dist{$vert_n} || $dist < $dist{$vert_n}) { |