* Fix $binver vs $ver typo in the single argument binarytosource

diff --git a/Debbugs/Packages.pm b/Debbugs/Packages.pm
index b129c8e1a1b7d6e51d8c841e80a10bfb87ce313d..0bceb72bfba1d7d2dab7d2d9cb726cbe029e00c8 100644 (file)
--- 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;
              }