Bug 787668: Use |use parent| instead of |use base|
r/a=LpSolit git-svn-id: svn://10.0.0.236/trunk@264508 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
@@ -10,7 +10,7 @@ package Bugzilla::WebService::Bug;
|
||||
use 5.10.1;
|
||||
use strict;
|
||||
|
||||
use base qw(Bugzilla::WebService);
|
||||
use parent qw(Bugzilla::WebService);
|
||||
|
||||
use Bugzilla::Comment;
|
||||
use Bugzilla::Constants;
|
||||
|
||||
@@ -10,7 +10,7 @@ package Bugzilla::WebService::Bugzilla;
|
||||
use 5.10.1;
|
||||
use strict;
|
||||
|
||||
use base qw(Bugzilla::WebService);
|
||||
use parent qw(Bugzilla::WebService);
|
||||
use Bugzilla::Constants;
|
||||
use Bugzilla::Util qw(datetime_from);
|
||||
use Bugzilla::WebService::Util qw(validate filter_wants);
|
||||
|
||||
@@ -10,7 +10,7 @@ package Bugzilla::WebService::Classification;
|
||||
use 5.10.1;
|
||||
use strict;
|
||||
|
||||
use base qw (Bugzilla::WebService);
|
||||
use parent qw (Bugzilla::WebService);
|
||||
|
||||
use Bugzilla::Classification;
|
||||
use Bugzilla::Error;
|
||||
|
||||
@@ -10,7 +10,7 @@ package Bugzilla::WebService::Constants;
|
||||
use 5.10.1;
|
||||
use strict;
|
||||
|
||||
use base qw(Exporter);
|
||||
use parent qw(Exporter);
|
||||
|
||||
our @EXPORT = qw(
|
||||
WS_ERROR_CODE
|
||||
|
||||
@@ -10,7 +10,7 @@ package Bugzilla::WebService::Group;
|
||||
use 5.10.1;
|
||||
use strict;
|
||||
|
||||
use base qw(Bugzilla::WebService);
|
||||
use parent qw(Bugzilla::WebService);
|
||||
use Bugzilla::Constants;
|
||||
use Bugzilla::Error;
|
||||
use Bugzilla::WebService::Util qw(validate translate params_to_objects);
|
||||
|
||||
@@ -10,7 +10,7 @@ package Bugzilla::WebService::Product;
|
||||
use 5.10.1;
|
||||
use strict;
|
||||
|
||||
use base qw(Bugzilla::WebService);
|
||||
use parent qw(Bugzilla::WebService);
|
||||
use Bugzilla::Product;
|
||||
use Bugzilla::User;
|
||||
use Bugzilla::Error;
|
||||
|
||||
@@ -11,7 +11,7 @@ When XMLRPC::Lite calls a method, $self is the name of the *class* the
|
||||
method is in. For example, if we call Bugzilla.version(), the first argument
|
||||
is Bugzilla::WebService::Bugzilla. So in order to have $self
|
||||
(our first argument) act correctly in XML-RPC, we make all WebService
|
||||
classes use base qw(Bugzilla::WebService).
|
||||
classes use parent qw(Bugzilla::WebService).
|
||||
|
||||
When JSON::RPC calls a method, $self is the JSON-RPC *server object*. In other
|
||||
words, it's an instance of Bugzilla::WebService::Server::JSONRPC. So we have
|
||||
|
||||
@@ -79,7 +79,7 @@ package Bugzilla::XMLRPC::Deserializer;
|
||||
use 5.10.1;
|
||||
use strict;
|
||||
|
||||
# We can't use "use base" because XMLRPC::Serializer doesn't return
|
||||
# We can't use "use parent" because XMLRPC::Serializer doesn't return
|
||||
# a true value.
|
||||
use XMLRPC::Lite;
|
||||
our @ISA = qw(XMLRPC::Deserializer);
|
||||
@@ -204,7 +204,7 @@ use 5.10.1;
|
||||
use strict;
|
||||
|
||||
use Scalar::Util qw(blessed);
|
||||
# We can't use "use base" because XMLRPC::Serializer doesn't return
|
||||
# We can't use "use parent" because XMLRPC::Serializer doesn't return
|
||||
# a true value.
|
||||
use XMLRPC::Lite;
|
||||
our @ISA = qw(XMLRPC::Serializer);
|
||||
|
||||
@@ -10,7 +10,7 @@ package Bugzilla::WebService::User;
|
||||
use 5.10.1;
|
||||
use strict;
|
||||
|
||||
use base qw(Bugzilla::WebService);
|
||||
use parent qw(Bugzilla::WebService);
|
||||
|
||||
use Bugzilla::Constants;
|
||||
use Bugzilla::Error;
|
||||
|
||||
@@ -10,7 +10,7 @@ package Bugzilla::WebService::Util;
|
||||
use 5.10.1;
|
||||
use strict;
|
||||
|
||||
use base qw(Exporter);
|
||||
use parent qw(Exporter);
|
||||
|
||||
# We have to "require", not "use" this, because otherwise it tries to
|
||||
# use features of Test::More during import().
|
||||
|
||||
Reference in New Issue
Block a user