TT#19710 Use parent instead of base

The latter is very heavy-weight and its use is discouraged.

Change-Id: I05fd8d0f75db2c572035c4b81a8861711199b3a0
changes/29/16629/4
Guillem Jover 8 years ago
parent c98d125970
commit e099b045cd

@ -3,7 +3,7 @@ package NGCP::InterceptSchema;
use warnings;
use strict;
use base 'NGCP::Schema';
use parent 'NGCP::Schema';
our $VERSION = '2.007';

@ -4,7 +4,7 @@ use Sipwise::Base '-skip'=>['TryCatch'];
use NGCP::Schema::Config qw();
use Regexp::Common qw(net);
use Regexp::IPv6 qw($IPv6_re);
use base 'DBIx::Class::Schema';
use parent 'DBIx::Class::Schema';
our $VERSION = '2.007';

@ -2,7 +2,7 @@ package NGCP::Schema::InflateColumn::DateTime::EpochMicro;
use Sipwise::Base '-skip'=>['TryCatch'];
use DateTime qw();
use base 'DBIx::Class';
use parent 'DBIx::Class';
our $VERSION = '2.007';

@ -2,7 +2,7 @@ package NGCP::Schema::InflateColumn::DateTime::EpochMilli;
use Sipwise::Base '-skip'=>['TryCatch'];
use DateTime qw();
use base 'DBIx::Class';
use parent 'DBIx::Class';
our $VERSION = '2.007';

@ -2,7 +2,7 @@ package NGCP::Schema::InflateColumn::DateTime::EpochString;
use Sipwise::Base '-skip'=>['TryCatch'];
use DateTime qw();
use base 'DBIx::Class';
use parent 'DBIx::Class';
our $VERSION = '2.007';

@ -1,6 +1,6 @@
package NGCP::Schema::Result::billing_mappings_actual;
use Scalar::Util qw(blessed);
use base qw/DBIx::Class::Core/;
use parent qw/DBIx::Class::Core/;
our $VERSION = '2.007';

@ -1,6 +1,6 @@
package NGCP::Schema::Result::contract_fraud_events;
use Scalar::Util qw(blessed);
use base qw/DBIx::Class::Core/;
use parent qw/DBIx::Class::Core/;
our $VERSION = '2.007';

@ -1,6 +1,6 @@
package NGCP::Schema::Result::contract_timezone;
use Scalar::Util qw(blessed);
use base qw/DBIx::Class::Core/;
use parent qw/DBIx::Class::Core/;
our $VERSION = '2.007';

@ -1,6 +1,6 @@
package NGCP::Schema::Result::lnp_numbers_actual;
use Scalar::Util qw(blessed);
use base qw/DBIx::Class::Core/;
use parent qw/DBIx::Class::Core/;
our $VERSION = '2.007';

@ -1,6 +1,6 @@
package NGCP::Schema::Result::messages_custom;
use Scalar::Util qw(blessed);
use base qw/DBIx::Class::Core/;
use parent qw/DBIx::Class::Core/;
our $VERSION = '2.007';

@ -1,6 +1,6 @@
package NGCP::Schema::Result::reseller_timezone;
use Scalar::Util qw(blessed);
use base qw/DBIx::Class::Core/;
use parent qw/DBIx::Class::Core/;
our $VERSION = '2.007';

@ -1,6 +1,6 @@
package NGCP::Schema::Result::timezones;
use Scalar::Util qw(blessed);
use base qw/DBIx::Class::Core/;
use parent qw/DBIx::Class::Core/;
our $VERSION = '2.007';

@ -1,6 +1,6 @@
package NGCP::Schema::Result::voip_subscriber_timezone;
use Scalar::Util qw(blessed);
use base qw/DBIx::Class::Core/;
use parent qw/DBIx::Class::Core/;
our $VERSION = '2.007';

@ -1,6 +1,6 @@
package NGCP::Schema::ResultSet;
use Sipwise::Base '-skip'=>['TryCatch'];
use base 'DBIx::Class::ResultSet';
use parent 'DBIx::Class::ResultSet';
our $VERSION = '2.007';

@ -5,7 +5,7 @@ use warnings;
our $VERSION = '0.06';
use base ("DateTime::Format::MySQL");
use parent 'DateTime::Format::MySQL';
sub format_time
{

Loading…
Cancel
Save