templates/en_US/cgi/bugreport_pkginfo.tmpl

   1 <div class="pkginfo">
   2   <p>{if (keys %package > 1) { q(Packages)} else {q(Package)}}:
   3      {join(q(, ),package_links(package => [map {$_->{package}} grep {!$_->{is_source}} values %package],
   4                                source  => [map {$_->{source} } grep { $_->{is_source}} values %package],
   5                                class => q(submitter),
   6                               )
   7           )};
   8 {my $output ='';
   9  for my $package (values %package) {
  10      $output .= q(Maintainer for ).package_links($package->{is_source}?(source=>$package->{source}):(package=>$package->{package})).qq( is ).
  11                 package_links(maintainer => $package->{maintainer}).qq(; );
  12      if (exists $package->{source} and not $package->{is_source}) {
  13         $output .= q(Source for ).package_links(package=>$package->{package}).qq( is ).
  14                     package_links(source => $package->{source}).
  15                     q{ (<a href="https://tracker.debian.org/pkg/}.html_escape(uri_escape($package->{source})).qq{">PTS</a>, }.
  16                     q{<a href="https://buildd.debian.org/}.html_escape(uri_escape($package->{source})).qq{">buildd</a>, }.
  17                     q{<a href="https://qa.debian.org/popcon.php?package=}.html_escape(uri_escape($package->{source})).qq{">popcon</a>)}.
  18                     qq(. );
  19      }
  20  }
  21  $output;
  22 }</p>
  23 { my $output = '';
  24   if (keys %affects) {
  25       $output .= q(<p>Affects: ).
  26           join(q(, ),
  27                package_links(package => [map {$_->{package}} grep {!$_->{is_source}} values %affects],
  28                              source  => [map {$_->{source} } grep { $_->{is_source}} values %affects],
  29                              class => q(submitter),
  30                             )
  31               ).q(</p>);
  32   }
  33   $output;
  34 }
  35 </div>