From 1001cbba7b16ccc4611bbee0474264bb551d1ea5 Mon Sep 17 00:00:00 2001
From: Frédéric Buclin <LpSolit@gmail.com>
Date: Sat, 1 Sep 2012 23:43:00 +0200
Subject: Bug 787529: Use |use 5.10.1| everywhere r=wicked a=LpSolit

---
 Bugzilla/WebService/Bug.pm            |  2 ++
 Bugzilla/WebService/Bugzilla.pm       |  2 ++
 Bugzilla/WebService/Constants.pm      |  2 ++
 Bugzilla/WebService/Group.pm          |  2 ++
 Bugzilla/WebService/Product.pm        |  2 ++
 Bugzilla/WebService/Server.pm         |  2 ++
 Bugzilla/WebService/Server/JSONRPC.pm |  2 ++
 Bugzilla/WebService/Server/XMLRPC.pm  | 13 ++++++++++++-
 Bugzilla/WebService/User.pm           |  3 ++-
 Bugzilla/WebService/Util.pm           |  3 +++
 10 files changed, 31 insertions(+), 2 deletions(-)

(limited to 'Bugzilla/WebService')

diff --git a/Bugzilla/WebService/Bug.pm b/Bugzilla/WebService/Bug.pm
index 75c3c2f61..1c8811b65 100644
--- a/Bugzilla/WebService/Bug.pm
+++ b/Bugzilla/WebService/Bug.pm
@@ -7,7 +7,9 @@
 
 package Bugzilla::WebService::Bug;
 
+use 5.10.1;
 use strict;
+
 use base qw(Bugzilla::WebService);
 
 use Bugzilla::Comment;
diff --git a/Bugzilla/WebService/Bugzilla.pm b/Bugzilla/WebService/Bugzilla.pm
index f441cee90..471110566 100644
--- a/Bugzilla/WebService/Bugzilla.pm
+++ b/Bugzilla/WebService/Bugzilla.pm
@@ -7,7 +7,9 @@
 
 package Bugzilla::WebService::Bugzilla;
 
+use 5.10.1;
 use strict;
+
 use base qw(Bugzilla::WebService);
 use Bugzilla::Constants;
 use Bugzilla::Util qw(datetime_from);
diff --git a/Bugzilla/WebService/Constants.pm b/Bugzilla/WebService/Constants.pm
index 491970291..dcd3a9fd7 100644
--- a/Bugzilla/WebService/Constants.pm
+++ b/Bugzilla/WebService/Constants.pm
@@ -7,7 +7,9 @@
 
 package Bugzilla::WebService::Constants;
 
+use 5.10.1;
 use strict;
+
 use base qw(Exporter);
 
 our @EXPORT = qw(
diff --git a/Bugzilla/WebService/Group.pm b/Bugzilla/WebService/Group.pm
index d7506aa3d..79ce1658b 100644
--- a/Bugzilla/WebService/Group.pm
+++ b/Bugzilla/WebService/Group.pm
@@ -7,7 +7,9 @@
 
 package Bugzilla::WebService::Group;
 
+use 5.10.1;
 use strict;
+
 use base qw(Bugzilla::WebService);
 use Bugzilla::Constants;
 use Bugzilla::Error;
diff --git a/Bugzilla/WebService/Product.pm b/Bugzilla/WebService/Product.pm
index 18594d726..8d6fc5df2 100644
--- a/Bugzilla/WebService/Product.pm
+++ b/Bugzilla/WebService/Product.pm
@@ -7,7 +7,9 @@
 
 package Bugzilla::WebService::Product;
 
+use 5.10.1;
 use strict;
+
 use base qw(Bugzilla::WebService);
 use Bugzilla::Product;
 use Bugzilla::User;
diff --git a/Bugzilla/WebService/Server.pm b/Bugzilla/WebService/Server.pm
index a43ed204c..5f1795178 100644
--- a/Bugzilla/WebService/Server.pm
+++ b/Bugzilla/WebService/Server.pm
@@ -6,6 +6,8 @@
 # defined by the Mozilla Public License, v. 2.0.
 
 package Bugzilla::WebService::Server;
+
+use 5.10.1;
 use strict;
 
 use Bugzilla::Error;
diff --git a/Bugzilla/WebService/Server/JSONRPC.pm b/Bugzilla/WebService/Server/JSONRPC.pm
index 804d7874e..46dd6b8da 100644
--- a/Bugzilla/WebService/Server/JSONRPC.pm
+++ b/Bugzilla/WebService/Server/JSONRPC.pm
@@ -7,7 +7,9 @@
 
 package Bugzilla::WebService::Server::JSONRPC;
 
+use 5.10.1;
 use strict;
+
 use Bugzilla::WebService::Server;
 BEGIN {
     our @ISA = qw(Bugzilla::WebService::Server);
diff --git a/Bugzilla/WebService/Server/XMLRPC.pm b/Bugzilla/WebService/Server/XMLRPC.pm
index e8fb5de99..22396bce1 100644
--- a/Bugzilla/WebService/Server/XMLRPC.pm
+++ b/Bugzilla/WebService/Server/XMLRPC.pm
@@ -7,7 +7,9 @@
 
 package Bugzilla::WebService::Server::XMLRPC;
 
+use 5.10.1;
 use strict;
+
 use XMLRPC::Transport::HTTP;
 use Bugzilla::WebService::Server;
 if ($ENV{MOD_PERL}) {
@@ -66,7 +68,10 @@ sub handle_login {
 # This exists to validate input parameters (which XMLRPC::Lite doesn't do)
 # and also, in some cases, to more-usefully decode them.
 package Bugzilla::XMLRPC::Deserializer;
+
+use 5.10.1;
 use strict;
+
 # We can't use "use base" because XMLRPC::Serializer doesn't return
 # a true value.
 use XMLRPC::Lite;
@@ -161,7 +166,10 @@ sub _validation_subs {
 1;
 
 package Bugzilla::XMLRPC::SOM;
+
+use 5.10.1;
 use strict;
+
 use XMLRPC::Lite;
 our @ISA = qw(XMLRPC::SOM);
 use Bugzilla::WebService::Util qw(taint_data);
@@ -184,8 +192,11 @@ sub paramsin {
 # This package exists to fix a UTF-8 bug in SOAP::Lite.
 # See http://rt.cpan.org/Public/Bug/Display.html?id=32952.
 package Bugzilla::XMLRPC::Serializer;
-use Scalar::Util qw(blessed);
+
+use 5.10.1;
 use strict;
+
+use Scalar::Util qw(blessed);
 # We can't use "use base" because XMLRPC::Serializer doesn't return
 # a true value.
 use XMLRPC::Lite;
diff --git a/Bugzilla/WebService/User.pm b/Bugzilla/WebService/User.pm
index 05bbf90ca..ee1442d72 100644
--- a/Bugzilla/WebService/User.pm
+++ b/Bugzilla/WebService/User.pm
@@ -7,10 +7,11 @@
 
 package Bugzilla::WebService::User;
 
+use 5.10.1;
 use strict;
+
 use base qw(Bugzilla::WebService);
 
-use Bugzilla;
 use Bugzilla::Constants;
 use Bugzilla::Error;
 use Bugzilla::Group;
diff --git a/Bugzilla/WebService/Util.pm b/Bugzilla/WebService/Util.pm
index 83b925015..0c206e030 100644
--- a/Bugzilla/WebService/Util.pm
+++ b/Bugzilla/WebService/Util.pm
@@ -6,7 +6,10 @@
 # defined by the Mozilla Public License, v. 2.0.
 
 package Bugzilla::WebService::Util;
+
+use 5.10.1;
 use strict;
+
 use base qw(Exporter);
 
 # We have to "require", not "use" this, because otherwise it tries to
-- 
cgit v1.2.3-24-g4f1b