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 78537f0..49dde40 100644 --- a/lib/Graph/Implicit.pm +++ b/lib/Graph/Implicit.pm @@ -103,7 +103,7 @@ sub astar { $pq->key_insert(0, $from); while ($pq->count) { my $cost = $pq->top_key; - my ($vertex, $path) = @{ $pq->extract_top }; + my $vertex = $pq->extract_top; if ($scorer) { my $score = $scorer->($vertex); return (\%pred, $vertex) if $score eq 'q'; |