Fix for bug 28458: "NEW" bugs were not getting CC or QA Contact information displayed.

checksetup.pl

@@ -1089,9 +1089,9 @@ AddFDef("rep_platform", "Platform", 1);
 AddFDef("bug_file_loc", "URL", 1);
 AddFDef("op_sys", "OS/Version", 1);
 AddFDef("bug_status", "Status", 1);
-AddFDef("status_whiteboard", "Status Whiteboard", 1);
-AddFDef("keywords", "Keywords", 1);
-AddFDef("resolution", "Resolution", 1);
+AddFDef("status_whiteboard", "Status Whiteboard", 0);
+AddFDef("keywords", "Keywords", 0);
+AddFDef("resolution", "Resolution", 0);
 AddFDef("bug_severity", "Severity", 1);
 AddFDef("priority", "Priority", 1);
 AddFDef("component", "Component", 1);
@@ -1099,7 +1099,7 @@ AddFDef("assigned_to", "AssignedTo", 1);
 AddFDef("reporter", "ReportedBy", 1);
 AddFDef("votes", "Votes", 0);
 AddFDef("qa_contact", "QAContact", 0);
-AddFDef("cc", "CC", 0);
+AddFDef("cc", "CC", 1);
 AddFDef("dependson", "BugsThisDependsOn", 0);
 AddFDef("blocked", "OtherBugsDependingOnThis", 0);
 AddFDef("attachments.description", "Attachment description", 0);

doeditparams.cgi

@@ -67,7 +67,13 @@ foreach my $i (@::param_list) {
         print "Changed $i.<br>\n";
 #      print "Old: '" . url_quote(Param($i)) . "'<BR>\n";
 #      print "New: '" . url_quote($::FORM{$i}) . "'<BR>\n";
-        $::param{$i} = $::FORM{$i}
+        $::param{$i} = $::FORM{$i};
+        # If the useqacontact Param is changing, update the mailheader
+        if ($i eq 'useqacontact') {
+            print "&nbsp;&nbsp;&nbsp;- Updating mailhead information<br>\n";
+            SendSQL("UPDATE fielddefs SET mailhead = " . SqlQuote($::param{$i}) .
+                    "WHERE name = 'qa_contact'");
+        }
     }
 }