summaryrefslogtreecommitdiffstats
path: root/editflagtypes.cgi
diff options
context:
space:
mode:
Diffstat (limited to 'editflagtypes.cgi')
-rwxr-xr-xeditflagtypes.cgi6
1 files changed, 4 insertions, 2 deletions
diff --git a/editflagtypes.cgi b/editflagtypes.cgi
index c8eb159c2..dfef55647 100755
--- a/editflagtypes.cgi
+++ b/editflagtypes.cgi
@@ -189,10 +189,12 @@ sub processCategoryChange {
push(@exclusions, $category) unless grep($_ eq $category, @exclusions);
}
elsif ($categoryAction eq 'removeInclusion') {
- @inclusions = map(($_ eq $cgi->param('inclusion_to_remove') ? () : $_), @inclusions);
+ my @inclusion_to_remove = $cgi->param('inclusion_to_remove');
+ @inclusions = map {(lsearch(\@inclusion_to_remove, $_) < 0) ? $_ : ()} @inclusions;
}
elsif ($categoryAction eq 'removeExclusion') {
- @exclusions = map(($_ eq $cgi->param('exclusion_to_remove') ? () : $_), @exclusions);
+ my @exclusion_to_remove = $cgi->param('exclusion_to_remove');
+ @exclusions = map {(lsearch(\@exclusion_to_remove, $_) < 0) ? $_ : ()} @exclusions;
}
# Convert the array @clusions('prod_ID:comp_ID') back to a hash of