requires 'Class::Unload' => 0;
requires 'File::Slurp' => '9999.13';
requires 'List::MoreUtils' => 0;
-requires 'namespace::autoclean' => 0;
+requires 'namespace::clean' => 0;
requires 'Data::Dumper::Concise' => '1.200';
requires 'Scope::Guard' => 0;
requires 'List::MoreUtils' => 0;
use strict;
use warnings;
use base qw/Class::Accessor::Grouped Class::C3::Componentised/;
-use namespace::autoclean;
use Class::C3;
use Carp::Clan qw/^DBIx::Class/;
use DBIx::Class::Schema::Loader::RelBuilder;
use File::Slurp 'slurp';
use DBIx::Class::Schema::Loader::Utils 'split_name';
require DBIx::Class;
+use namespace::clean;
our $VERSION = '0.07001';
$src_text.= qq|use Moose;\nuse MooseX::NonMoose;\nuse namespace::autoclean;|;
# these options 'use base' which is compile time
- if ($self->left_base_classes || $self->additional_base_classes) {
+ if (@{ $self->left_base_classes } || @{ $self->additional_base_classes }) {
$src_text .= qq|\nBEGIN { extends '$result_base_class' }\n\n|;
}
else {
use warnings;
use Class::C3;
use base qw/DBIx::Class::Schema::Loader::DBI/;
-use namespace::autoclean;
use Carp::Clan qw/^DBIx::Class/;
use Scalar::Util 'looks_like_number';
+use namespace::clean;
our $VERSION = '0.07001';
use strict;
use warnings;
-use namespace::autoclean;
use Class::C3;
use base qw/DBIx::Class::Schema::Loader::DBI/;
use Carp::Clan qw/^DBIx::Class/;
use List::Util 'first';
+use namespace::clean;
our $VERSION = '0.07001';
dat2 VARCHAR(32) NOT NULL,
set_primary_key INTEGER $self->{null},
dbix_class_testcomponent INTEGER $self->{null},
- meta $self->{null},
+ meta INTEGER $self->{null},
UNIQUE (dat2, dat)
) $self->{innodb}
},