summaryrefslogtreecommitdiffstats
path: root/Bugzilla/WebService
diff options
context:
space:
mode:
Diffstat (limited to 'Bugzilla/WebService')
-rw-r--r--Bugzilla/WebService/Bug.pm2
-rw-r--r--Bugzilla/WebService/Bugzilla.pm2
-rw-r--r--Bugzilla/WebService/Constants.pm2
-rw-r--r--Bugzilla/WebService/Group.pm2
-rw-r--r--Bugzilla/WebService/Product.pm2
-rw-r--r--Bugzilla/WebService/Server.pm2
-rw-r--r--Bugzilla/WebService/Server/JSONRPC.pm2
-rw-r--r--Bugzilla/WebService/Server/XMLRPC.pm13
-rw-r--r--Bugzilla/WebService/User.pm3
-rw-r--r--Bugzilla/WebService/Util.pm3
10 files changed, 31 insertions, 2 deletions
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