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

Patch by Jake Steenhagen <jake@acutex.net>
r= justdave@syndicomm.com

1 files changed, 7 insertions, 1 deletions

diff --git a/doeditparams.cgi b/doeditparams.cgi
index 148946fef..3d95637fe 100755
--- a/doeditparams.cgi
+++ b/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'");
+        }
     }
 }