Set priority to '-' if it isn't in the Sources.gz file

diff --git a/bin/parse-sources b/bin/parse-sources
index 77c7da542d6ec564b5b304124dc3ea6c1221a398..4976260b08523357fcc4944589feb7c14d1a78cc 100755 (executable)
--- a/bin/parse-sources
+++ b/bin/parse-sources
@@ -58,6 +58,7 @@ for my $suite (@suites) {
                if ($data{section} && ($data{section} =~ m=/=o)) {
                    ($section, $subsection) = split m=/=o, $data{section}, 2;
                }
+               $data{'priority'} = "-" if not exists($data{'priority'});
                $sources_small{$data{'package'}} .=
                        "$suite $section $subsection $data{'priority'} $data{'version'}\000";
        }