Fix for bug 101659: emailsuffix was missing from the component owner mailto tag on sites that use emailsuffix.

Patch by Steve Naldrett <snaldrett@transparentnetworks.com>
r= justdave@syndicomm.com x2
This commit is contained in:
justdave%syndicomm.com 2001-09-26 02:37:29 +00:00
parent 81ff38a145
commit 2084da19a0

View File

@ -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";