summaryrefslogtreecommitdiffstats
path: root/describecomponents.cgi
diff options
context:
space:
mode:
Diffstat (limited to 'describecomponents.cgi')
-rwxr-xr-xdescribecomponents.cgi5
1 files changed, 3 insertions, 2 deletions
diff --git a/describecomponents.cgi b/describecomponents.cgi
index 95f5ba316..2b0d3596a 100755
--- a/describecomponents.cgi
+++ b/describecomponents.cgi
@@ -104,6 +104,7 @@ print "
<th align=left>Default owner</th>
";
+my $emailsuffix = Param("emailsuffix");
my $useqacontact = Param("useqacontact");
my $cols = 2;
@@ -131,11 +132,11 @@ foreach (@data) {
print qq|
<tr><td colspan=$cols><hr></td></tr>
<tr><td rowspan=2>$component</td>
-<td><a href="mailto:$initialowner">$initialowner</a></td>
+<td><a href="mailto:$initialowner$emailsuffix">$initialowner</a></td>
|;
if ($useqacontact) {
print qq|
-<td><a href="mailto:$initialqacontact">$initialqacontact</a></td>
+<td><a href="mailto:$initialqacontact$emailsuffix">$initialqacontact</a></td>
|;
}
print "</tr><tr><td colspan=$colbut1>$description</td></tr>\n";