summaryrefslogtreecommitdiffstats
path: root/show_bug.cgi
diff options
context:
space:
mode:
authorFrédéric Buclin <LpSolit@gmail.com>2016-02-29 19:34:34 +0100
committerFrédéric Buclin <LpSolit@gmail.com>2016-02-29 19:34:34 +0100
commit86fb87f1a65a17e7a86fe71b06d57767b0b3ea3b (patch)
tree85acb4dc08ab6ff6247c2aafca88ac7bb3acd2e0 /show_bug.cgi
parent438d57d65626d068ca0f28de46410ebecc9a9b57 (diff)
downloadbugzilla-86fb87f1a65a17e7a86fe71b06d57767b0b3ea3b.tar.gz
bugzilla-86fb87f1a65a17e7a86fe71b06d57767b0b3ea3b.tar.xz
Bug 1136137: Require Perl 5.14
r=dkl
Diffstat (limited to 'show_bug.cgi')
-rwxr-xr-xshow_bug.cgi6
1 files changed, 3 insertions, 3 deletions
diff --git a/show_bug.cgi b/show_bug.cgi
index 997fab60d..09cb91a86 100755
--- a/show_bug.cgi
+++ b/show_bug.cgi
@@ -6,7 +6,7 @@
# This Source Code Form is "Incompatible With Secondary Licenses", as
# defined by the Mozilla Public License, v. 2.0.
-use 5.10.1;
+use 5.14.0;
use strict;
use warnings;
@@ -51,11 +51,11 @@ if ($single) {
push @bugs, Bugzilla::Bug->check({ id => $id, cache => 1 });
if (defined $cgi->param('mark')) {
foreach my $range (split ',', $cgi->param('mark')) {
- if ($range =~ /^(\d+)-(\d+)$/) {
+ if ($range =~ /^(\d+)-(\d+)$/a) {
foreach my $i ($1..$2) {
$marks{$i} = 1;
}
- } elsif ($range =~ /^(\d+)$/) {
+ } elsif ($range =~ /^(\d+)$/a) {
$marks{$1} = 1;
}
}