diff options
-rwxr-xr-x | showdependencygraph.cgi | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/showdependencygraph.cgi b/showdependencygraph.cgi index 1e3a02e2a..6ead9f84d 100755 --- a/showdependencygraph.cgi +++ b/showdependencygraph.cgi @@ -65,6 +65,7 @@ node [URL="${urlbase}show_bug.cgi?id=\\N", style=filled, color=lightgrey] $baselist{$i} = 1; } } + my @basearray = keys(%baselist); if ($::FORM{'doall'}) { SendSQL("select blocked, dependson from dependencies"); @@ -74,7 +75,7 @@ node [URL="${urlbase}show_bug.cgi?id=\\N", style=filled, color=lightgrey] AddLink($blocked, $dependson); } } else { - my @stack = keys(%baselist); + my @stack = @basearray; while (@stack) { my $id = shift @stack; SendSQL("select blocked, dependson from dependencies where blocked = $id or dependson = $id"); @@ -91,6 +92,9 @@ node [URL="${urlbase}show_bug.cgi?id=\\N", style=filled, color=lightgrey] } } + foreach my $k (@basearray) { + $seen{$k} = 1; + } foreach my $k (keys(%seen)) { my $summary = ""; my $stat; |