Correcting the previous backout attempt, apparrently typoed a version number last time

parent 7f892832
...@@ -842,15 +842,15 @@ if (defined $::FORM{newcc} || defined $::FORM{removecc} || defined $::FORM{massc ...@@ -842,15 +842,15 @@ if (defined $::FORM{newcc} || defined $::FORM{removecc} || defined $::FORM{massc
} }
if ($cc_add) { if ($cc_add) {
$cc_add =~ s/^[\s,]+//; # Remove leading delimiters. $cc_add =~ s/[\s,]+/ /g; # Change all delimiters to a single space
foreach my $person ( split(/[\s,]+/, $cc_add) ) { foreach my $person ( split(" ", $cc_add) ) {
my $pid = DBNameToIdAndCheck($person); my $pid = DBNameToIdAndCheck($person);
$cc_add{$pid} = $person; $cc_add{$pid} = $person;
} }
} }
if ($cc_remove) { if ($cc_remove) {
$cc_remove =~ s/^[\s,]+//; # Remove leading delimiters. $cc_remove =~ s/[\s,]+/ /g; # Change all delimiters to a single space
foreach my $person ( split(/[\s,]+/, $cc_remove) ) { foreach my $person ( split(" ", $cc_remove) ) {
my $pid = DBNameToIdAndCheck($person); my $pid = DBNameToIdAndCheck($person);
$cc_remove{$pid} = $person; $cc_remove{$pid} = $person;
} }
...@@ -858,7 +858,7 @@ if (defined $::FORM{newcc} || defined $::FORM{removecc} || defined $::FORM{massc ...@@ -858,7 +858,7 @@ if (defined $::FORM{newcc} || defined $::FORM{removecc} || defined $::FORM{massc
} }
CheckFormFieldDefined(\%::FORM, 'knob', "check that \"Leave as...\" was selected."); CheckFormFieldDefined(\%::FORM, 'knob');
SWITCH: for ($::FORM{'knob'}) { SWITCH: for ($::FORM{'knob'}) {
/^none$/ && do { /^none$/ && do {
last SWITCH; last SWITCH;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment