From 1f700c4d4825b7468b6c2cc82ccad269a9e3abfb Mon Sep 17 00:00:00 2001 From: "terry%mozilla.org" <> Date: Wed, 12 Jan 2000 02:25:11 +0000 Subject: Was making changes to bugs before validating the entries in the CC field. This caused mid-air collisions and other weirdnesses. --- process_bug.cgi | 28 +++++++++++++++++++--------- 1 file changed, 19 insertions(+), 9 deletions(-) (limited to 'process_bug.cgi') diff --git a/process_bug.cgi b/process_bug.cgi index 3919dadb0..e72e9704b 100755 --- a/process_bug.cgi +++ b/process_bug.cgi @@ -248,6 +248,24 @@ if (defined $::FORM{'qa_contact'}) { ConnectToDatabase(); +my %ccids; +my $origcclist = ""; + +# We make sure to check out the CC list before we actually start touching any +# bugs. +if (defined $::FORM{'cc'} && defined $::FORM{'id'}) { + $origcclist = ShowCcList($::FORM{'id'}); + if ($origcclist ne $::FORM{'cc'}) { + foreach my $person (split(/[ ,]/, $::FORM{'cc'})) { + if ($person ne "") { + my $cid = DBNameToIdAndCheck($person); + $ccids{$cid} = 1; + } + } + } +} + + if ( Param('strictvaluechecks') ) { CheckFormFieldDefined(\%::FORM, 'knob'); } @@ -573,15 +591,7 @@ The changes made were: AppendComment($id, $::FORM{'who'}, $::FORM{'comment'}); } - if (defined $::FORM{'cc'} && ShowCcList($id) ne $::FORM{'cc'}) { - my %ccids; - foreach my $person (split(/[ ,]/, $::FORM{'cc'})) { - if ($person ne "") { - my $cid = DBNameToIdAndCheck($person); - $ccids{$cid} = 1; - } - } - + if (defined $::FORM{'cc'} && $origcclist ne $::FORM{'cc'}) { SendSQL("delete from cc where bug_id = $id"); foreach my $ccid (keys %ccids) { SendSQL("insert into cc (bug_id, who) values ($id, $ccid)"); -- cgit v1.2.3-24-g4f1b