X-Git-Url: https://git.deb.at/?a=blobdiff_plain;f=bin%2Fparse-packages;h=6dad93ea1f8b9cf6d06b17533838badc81858813;hb=5aee756a0f6437b2fbdbf9f8abc4233917fc1842;hp=97edffcd19666bc4a438c7b1bfe1108a4ecfd132;hpb=b84419b2f87cf3c43b83fca71486be4fae81375e;p=deb%2Fpackages.git diff --git a/bin/parse-packages b/bin/parse-packages index 97edffc..6dad93e 100755 --- a/bin/parse-packages +++ b/bin/parse-packages @@ -85,6 +85,8 @@ for my $suite (@SUITES) { $key =~ tr [A-Z] [a-z]; $data{$key} = $value; } + # Skip broken debs + next unless $data{architecture}; # Skip double package next if exists($packages_all_db{"$data{'package'} $data{'architecture'} $data{'version'}"}); # Skip arch:all for amd64 & debports, any non-redundancy is @@ -115,10 +117,12 @@ for my $suite (@SUITES) { foreach (@complete_tags) { my ($facet, $tag) = split( /::/, $_, 2); if ($tag =~ s/^\{(.+)\}$/$1/) { + warn "pkg=$data{package} tags=$data{tag}\n" unless $facet && $tag; foreach (split( /,/, $tag )) { push @tags, "${facet}::$_"; } } else { + warn "pkg=$data{package} tags=$data{tag}\n" unless $facet && $tag; push @tags, "${facet}::$tag"; } }