Add affects to bugreport.cgi package info header (Closes: #609687).

[debbugs.git] / templates / en_US / cgi / bugreport_pkginfo.tmpl

diff --git a/templates/en_US/cgi/bugreport_pkginfo.tmpl b/templates/en_US/cgi/bugreport_pkginfo.tmpl
index 872aff44fc0913a75b4c0c0789a79fd2ef169c75..777928ed712adbe064ae74935d88022d52937d4a 100644 (file)
--- a/templates/en_US/cgi/bugreport_pkginfo.tmpl
+++ b/templates/en_US/cgi/bugreport_pkginfo.tmpl
@@ -16,4 +16,16 @@
  }
  $output;
 }</p>
+{ my $output = '';
+  if (keys %affects) {
+      $output .= q(<p>Affects: ).
+          join(q(, ),
+               package_links(package => [map {$_->{package}} grep {!$_->{is_source}} values %affects],
+                             source  => [map {$_->{source} } grep { $_->{is_source}} values %affects],
+                             class => q(submitter),
+                            )
+              ).q(</p>);
+  }
+  $output;
+}
 </div>