From: cjwatson <> Date: Thu, 17 Jul 2003 04:43:05 +0000 (-0800) Subject: [project @ 2003-07-16 21:43:05 by cjwatson] X-Git-Tag: release/2.6.0~839 X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=c8f53d9ef03d147a15965083c57e7898861937c5;p=debbugs.git [project @ 2003-07-16 21:43:05 by cjwatson] Remove redundant variable declarations. --- diff --git a/cgi/pkgreport.cgi b/cgi/pkgreport.cgi index 268c3221..af454ede 100755 --- a/cgi/pkgreport.cgi +++ b/cgi/pkgreport.cgi @@ -135,7 +135,7 @@ if (defined $pkg) { my %maintainers = %{getmaintainers()}; $title = "maintainer $maint"; if ($maint eq "") { - @bugs = @{getbugs(sub {my %d=@_; my $me; + @bugs = @{getbugs(sub {my %d=@_; foreach my $try (splitpackages($d{"pkg"})) { my @me = getparsedaddrs($maintainers{$try}); return 1 if grep { $_->address eq $maint } @me; @@ -151,7 +151,7 @@ if (defined $pkg) { push @pkgs, $p if grep { $_->address eq $try } @me; } } - @bugs = @{getbugs(sub {my %d=@_; my $me; + @bugs = @{getbugs(sub {my %d=@_; foreach my $try (splitpackages($d{"pkg"})) { my @me = getparsedaddrs($maintainers{$try}); return 1 if grep { $_->address eq $maint } @me;