From 86fb87f1a65a17e7a86fe71b06d57767b0b3ea3b Mon Sep 17 00:00:00 2001
From: Frédéric Buclin <LpSolit@gmail.com>
Date: Mon, 29 Feb 2016 19:34:34 +0100
Subject: Bug 1136137: Require Perl 5.14 r=dkl

---
 Bugzilla/API/1_0/Constants.pm                 | 2 +-
 Bugzilla/API/1_0/Resource.pm                  | 2 +-
 Bugzilla/API/1_0/Resource/Bug.pm              | 4 ++--
 Bugzilla/API/1_0/Resource/BugUserLastVisit.pm | 3 ++-
 Bugzilla/API/1_0/Resource/Bugzilla.pm         | 2 +-
 Bugzilla/API/1_0/Resource/Classification.pm   | 2 +-
 Bugzilla/API/1_0/Resource/Component.pm        | 2 +-
 Bugzilla/API/1_0/Resource/FlagType.pm         | 2 +-
 Bugzilla/API/1_0/Resource/Group.pm            | 2 +-
 Bugzilla/API/1_0/Resource/Product.pm          | 2 +-
 Bugzilla/API/1_0/Resource/User.pm             | 2 +-
 Bugzilla/API/1_0/Server.pm                    | 2 +-
 Bugzilla/API/1_0/Util.pm                      | 2 +-
 Bugzilla/API/Server.pm                        | 2 +-
 14 files changed, 16 insertions(+), 15 deletions(-)

(limited to 'Bugzilla/API')

diff --git a/Bugzilla/API/1_0/Constants.pm b/Bugzilla/API/1_0/Constants.pm
index 44e20124a..d372d410d 100644
--- a/Bugzilla/API/1_0/Constants.pm
+++ b/Bugzilla/API/1_0/Constants.pm
@@ -7,7 +7,7 @@
 
 package Bugzilla::API::1_0::Constants;
 
-use 5.10.1;
+use 5.14.0;
 use strict;
 use warnings;
 
diff --git a/Bugzilla/API/1_0/Resource.pm b/Bugzilla/API/1_0/Resource.pm
index 9881d3713..5a26851a5 100644
--- a/Bugzilla/API/1_0/Resource.pm
+++ b/Bugzilla/API/1_0/Resource.pm
@@ -10,7 +10,7 @@
 
 package Bugzilla::API::1_0::Resource;
 
-use 5.10.1;
+use 5.14.0;
 use strict;
 use warnings;
 
diff --git a/Bugzilla/API/1_0/Resource/Bug.pm b/Bugzilla/API/1_0/Resource/Bug.pm
index a8565b7a0..dcc73086f 100644
--- a/Bugzilla/API/1_0/Resource/Bug.pm
+++ b/Bugzilla/API/1_0/Resource/Bug.pm
@@ -7,7 +7,7 @@
 
 package Bugzilla::API::1_0::Resource::Bug;
 
-use 5.10.1;
+use 5.14.0;
 use strict;
 use warnings;
 
@@ -670,7 +670,7 @@ sub search {
     my %options = ( fields => ['bug_id'] );
 
     # Find the highest custom field id
-    my @field_ids = grep(/^f(\d+)$/, keys %$match_params);
+    my @field_ids = grep(/^f(\d+)$/a, keys %$match_params);
     my $last_field_id = @field_ids ? max @field_ids + 1 : 1;
 
     # Do special search types for certain fields.
diff --git a/Bugzilla/API/1_0/Resource/BugUserLastVisit.pm b/Bugzilla/API/1_0/Resource/BugUserLastVisit.pm
index aeb52bbb6..20fdb158f 100644
--- a/Bugzilla/API/1_0/Resource/BugUserLastVisit.pm
+++ b/Bugzilla/API/1_0/Resource/BugUserLastVisit.pm
@@ -7,7 +7,7 @@
 
 package Bugzilla::API::1_0::Resource::BugUserLastVisit;
 
-use 5.10.1;
+use 5.14.0;
 use strict;
 use warnings;
 
@@ -35,6 +35,7 @@ use constant PUBLIC_METHODS => qw(
 );
 
 sub REST_RESOURCES {
+    use re '/a';
     return [
         # bug-id
         qr{^/bug_user_last_visit/(\d+)$}, {
diff --git a/Bugzilla/API/1_0/Resource/Bugzilla.pm b/Bugzilla/API/1_0/Resource/Bugzilla.pm
index fce840c47..f5bb2f417 100644
--- a/Bugzilla/API/1_0/Resource/Bugzilla.pm
+++ b/Bugzilla/API/1_0/Resource/Bugzilla.pm
@@ -7,7 +7,7 @@
 
 package Bugzilla::API::1_0::Resource::Bugzilla;
 
-use 5.10.1;
+use 5.14.0;
 use strict;
 use warnings;
 
diff --git a/Bugzilla/API/1_0/Resource/Classification.pm b/Bugzilla/API/1_0/Resource/Classification.pm
index 7a59e381d..28ed2aa95 100644
--- a/Bugzilla/API/1_0/Resource/Classification.pm
+++ b/Bugzilla/API/1_0/Resource/Classification.pm
@@ -7,7 +7,7 @@
 
 package Bugzilla::API::1_0::Resource::Classification;
 
-use 5.10.1;
+use 5.14.0;
 use strict;
 use warnings;
 
diff --git a/Bugzilla/API/1_0/Resource/Component.pm b/Bugzilla/API/1_0/Resource/Component.pm
index 13a5f24b5..ba9b27d62 100644
--- a/Bugzilla/API/1_0/Resource/Component.pm
+++ b/Bugzilla/API/1_0/Resource/Component.pm
@@ -7,7 +7,7 @@
 
 package Bugzilla::API::1_0::Resource::Component;
 
-use 5.10.1;
+use 5.14.0;
 use strict;
 use warnings;
 
diff --git a/Bugzilla/API/1_0/Resource/FlagType.pm b/Bugzilla/API/1_0/Resource/FlagType.pm
index 969a59532..febce6f71 100644
--- a/Bugzilla/API/1_0/Resource/FlagType.pm
+++ b/Bugzilla/API/1_0/Resource/FlagType.pm
@@ -7,7 +7,7 @@
 
 package Bugzilla::API::1_0::Resource::FlagType;
 
-use 5.10.1;
+use 5.14.0;
 use strict;
 use warnings;
 
diff --git a/Bugzilla/API/1_0/Resource/Group.pm b/Bugzilla/API/1_0/Resource/Group.pm
index 4efd7b476..43a2521fb 100644
--- a/Bugzilla/API/1_0/Resource/Group.pm
+++ b/Bugzilla/API/1_0/Resource/Group.pm
@@ -7,7 +7,7 @@
 
 package Bugzilla::API::1_0::Resource::Group;
 
-use 5.10.1;
+use 5.14.0;
 use strict;
 use warnings;
 
diff --git a/Bugzilla/API/1_0/Resource/Product.pm b/Bugzilla/API/1_0/Resource/Product.pm
index 6a5168608..d3576a734 100644
--- a/Bugzilla/API/1_0/Resource/Product.pm
+++ b/Bugzilla/API/1_0/Resource/Product.pm
@@ -7,7 +7,7 @@
 
 package Bugzilla::API::1_0::Resource::Product;
 
-use 5.10.1;
+use 5.14.0;
 use strict;
 use warnings;
 
diff --git a/Bugzilla/API/1_0/Resource/User.pm b/Bugzilla/API/1_0/Resource/User.pm
index ec81cf66d..a214bd81f 100644
--- a/Bugzilla/API/1_0/Resource/User.pm
+++ b/Bugzilla/API/1_0/Resource/User.pm
@@ -7,7 +7,7 @@
 
 package Bugzilla::API::1_0::Resource::User;
 
-use 5.10.1;
+use 5.14.0;
 use strict;
 use warnings;
 
diff --git a/Bugzilla/API/1_0/Server.pm b/Bugzilla/API/1_0/Server.pm
index af66a4f66..a443cd514 100644
--- a/Bugzilla/API/1_0/Server.pm
+++ b/Bugzilla/API/1_0/Server.pm
@@ -7,7 +7,7 @@
 
 package Bugzilla::API::1_0::Server;
 
-use 5.10.1;
+use 5.14.0;
 use strict;
 use warnings;
 
diff --git a/Bugzilla/API/1_0/Util.pm b/Bugzilla/API/1_0/Util.pm
index afdde314e..e2c7b1f1f 100644
--- a/Bugzilla/API/1_0/Util.pm
+++ b/Bugzilla/API/1_0/Util.pm
@@ -7,7 +7,7 @@
 
 package Bugzilla::API::1_0::Util;
 
-use 5.10.1;
+use 5.14.0;
 use strict;
 use warnings;
 
diff --git a/Bugzilla/API/Server.pm b/Bugzilla/API/Server.pm
index 2d680db28..e3bf1ea71 100644
--- a/Bugzilla/API/Server.pm
+++ b/Bugzilla/API/Server.pm
@@ -7,7 +7,7 @@
 
 package Bugzilla::API::Server;
 
-use 5.10.1;
+use 5.14.0;
 use strict;
 use warnings;
 
-- 
cgit v1.2.3-24-g4f1b