diff options
| author | Frédéric Buclin <LpSolit@gmail.com> | 2010-10-28 17:20:46 +0200 |
|---|---|---|
| committer | Frédéric Buclin <LpSolit@gmail.com> | 2010-10-28 17:20:46 +0200 |
| commit | 5ba4b1aff6564126b3d0b1e7741b992d178d8f66 (patch) | |
| tree | d61d32e7a433608eda5d62871eccafe23e931d43 /editflagtypes.cgi | |
| parent | a6041007c544e7b2a8ae703c8e45e635e2ace991 (diff) | |
| download | bugzilla-5ba4b1aff6564126b3d0b1e7741b992d178d8f66.tar.gz bugzilla-5ba4b1aff6564126b3d0b1e7741b992d178d8f66.tar.xz | |
Bug 607966: Use of qw(...) as parentheses is deprecated since Perl 5.13.5
r=gerv a=LpSolit
Diffstat (limited to 'editflagtypes.cgi')
| -rwxr-xr-x | editflagtypes.cgi | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/editflagtypes.cgi b/editflagtypes.cgi index 3e3f94f2e..ecfa32ca8 100755 --- a/editflagtypes.cgi +++ b/editflagtypes.cgi @@ -112,7 +112,7 @@ if (my ($category_action) = grep { $_ =~ /^categoryAction-(?:\w+)$/ } $cgi->para my $type = {}; $type->{$_} = $cgi->param($_) foreach $cgi->param(); # Make sure boolean fields are defined, else they fall back to 1. - foreach my $boolean qw(is_active is_requestable is_requesteeble is_multiplicable) { + foreach my $boolean (qw(is_active is_requestable is_requesteeble is_multiplicable)) { $type->{$boolean} ||= 0; } |