Do not skip binary packages if sources do not exist.

 - This fixes issues where -udeb packages were not thought to be in a
   distribution, causing issues with #885556

diff --git a/examples/debian/versions/build-versions-db b/examples/debian/versions/build-versions-db
index 70b7b927045bfe53379ffee328fece60d3bda500..6d2269605afc03b799d6c039ed6863e322f29dbc 100755 (executable)
--- a/examples/debian/versions/build-versions-db
+++ b/examples/debian/versions/build-versions-db
@@ -206,10 +206,9 @@ for my $suite (@{$suites}) {
        my $sources = (grep { -f $_ } glob "$componentdir/source/Sources.*")[0];
        if (not defined $sources) {
            print STDERR "No sources matching $componentdir/source/Sources.*\n" if $DEBUG;
-           next;
+       } else {
+           read_packages($db,$db2,$sources, $viscomponent,'source',$suite);
        }
-       read_packages($db,$db2,$sources, $viscomponent,'source',$suite);
-
        for my $arch (readdir $COMPONENT) {
            next unless $arch =~ s/^binary-//;
            my $archdir = "$componentdir/binary-$arch";