From d2a71a84b0bee0f23c1fa7607f04f7abfff578b2 Mon Sep 17 00:00:00 2001 From: Don Armstrong Date: Wed, 20 Feb 2008 02:27:53 -0800 Subject: [PATCH] * Fix $binver vs $ver typo in the single argument binarytosource --- Debbugs/Packages.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/Debbugs/Packages.pm b/Debbugs/Packages.pm index b129c8e..0bceb72 100644 --- a/Debbugs/Packages.pm +++ b/Debbugs/Packages.pm @@ -154,8 +154,8 @@ sub binarytosource { if (not defined $binver) { my %uniq; for my $ver (keys %binary) { - for my $ar (keys %{$binary{$binver}}) { - my $src = $binary{$binver}{$ar}; + for my $ar (keys %{$binary{$ver}}) { + my $src = $binary{$ver}{$ar}; next unless defined $src; $uniq{$src->[0]} = 1; } -- 2.39.2