{ head("Lintian Tags") }
  <h1>Tags</h1>

  <p>
    This is a list of all tags that occur at least once in the archive
    with their frequency counts.  This includes all tags, even
    experimental and info tags.
  </p>

  <ul>
{
    for my $tag (sort keys %tags) {
        my ($count, $overrides) = (0, 0);
        my %seen;
        for my $info (@{ $tags{$tag} }) {
            if ($info->{code} eq 'O') {
                $overrides++;
            } else {
                $count++;
                $seen{$info->{xref}}++;
            }
        }
        my $packages = scalar keys %seen;
        $OUT .= qq(    <li><a href="tags/$tag.html">$tag</a>)
            . " ($packages packages, $count tags, plus $overrides overrides)"
            . "</li>\n";
    }
}  </ul>
{ foot() }