Was sometimes checking extra checkboxes in the email area.

This commit is contained in:
terry%mozilla.org 2000-01-17 22:31:05 +00:00
Родитель ab00d9bb79
Коммит 746335ea97
1 изменённых файлов: 11 добавлений и 10 удалений

Просмотреть файл

@ -139,18 +139,10 @@ sub GenerateEmailInput {
my $reporter = ($default{"emailreporter$id"} eq "1") ? "checked" : "";
my $cc = ($default{"emailcc$id"} eq "1") ? "checked" : "";
if ($assignedto eq "" && $reporter eq "" && $cc eq "") {
if ($id eq "1") {
$assignedto = "checked";
} else {
$reporter = "checked";
}
}
my $qapart = "";
my $qacontact = "";
if (Param("useqacontact")) {
my $qacontact =
($default{"emailqa_contact$id"} eq "1") ? "checked" : "";
$qacontact = ($default{"emailqa_contact$id"} eq "1") ? "checked" : "";
$qapart = qq|
<tr>
<td></td>
@ -160,6 +152,15 @@ sub GenerateEmailInput {
</tr>
|;
}
if ($assignedto eq "" && $reporter eq "" && $cc eq "" &&
$qacontact eq "") {
if ($id eq "1") {
$assignedto = "checked";
} else {
$reporter = "checked";
}
}
return qq|
<table border=1 cellspacing=0 cellpadding=0>