[project @ 2005-07-18 04:13:21 by cjwatson]

Prefer source architecture for src= queries, but allow other architectures
if source isn't present for a given package. Fixes handling of multi-binary
packages.

diff --git a/cgi/common.pl b/cgi/common.pl
index 5f1185f6d0bddd93d95e03848e22c817739d920d..ad9a902a065b94f7cdf7dd132c20397f63931f25 100644 (file)
--- a/cgi/common.pl
+++ b/cgi/common.pl
@@ -918,7 +918,7 @@ sub getversions {
             or die "can't open versions index: $!";
     }
 
-    if (defined $arch) {
+    if (defined $arch and exists $_versions{$pkg}{$dist}{$arch}) {
         my $ver = $_versions{$pkg}{$dist}{$arch};
         return $ver if defined $ver;
         return ();