From c8f53d9ef03d147a15965083c57e7898861937c5 Mon Sep 17 00:00:00 2001 From: cjwatson <> Date: Wed, 16 Jul 2003 20:43:05 -0800 Subject: [PATCH] [project @ 2003-07-16 21:43:05 by cjwatson] Remove redundant variable declarations. --- cgi/pkgreport.cgi | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) 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; -- 2.39.5