X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=cgi%2Fversion.cgi;h=ab8f3c17a287604aa8e565165c961bd5987c0889;hb=d27fba421d015e0f5f3f593da98d242072cf3bf1;hp=046fec660fac33ed1d359b3f481a1fd1cd2156ff;hpb=439cc3070c8396865639bacbf98704cae68a24bd;p=debbugs.git diff --git a/cgi/version.cgi b/cgi/version.cgi index 046fec6..ab8f3c1 100755 --- a/cgi/version.cgi +++ b/cgi/version.cgi @@ -102,7 +102,7 @@ END print '['.($cgi_var{collapse}?"Don't c":'C').'ollapse] '; print '[Dot]
'; + '">[Dot]
'; print ''; print < @@ -232,7 +232,6 @@ if ($cgi_var{collapse}) { # nodes that can be collapsed are those that have one child # are in the same state as their parent, and are not in a suite foreach my $key (keys %reversed_nodes) { - my ($short_version) = $key =~ m{/(.+)$}; if (not exists $version_to_dist{$key} and @{$reversed_nodes{$key}} <= 1 and defined $version->{parent}{$key} @@ -282,7 +281,6 @@ if ($cgi_var{collapse}) { } foreach my $key (keys %all_states) { - my ($short_version) = $key =~ m{/(.+)$}; next if exists $collapsed_nodes{$key}; next if $cgi_var{ignore_boring} and (not defined $all_states{$key} or $all_states{$key} eq 'absent');