'Data::Page' => 0,
'DBI' => 0,
'UNIVERSAL::require' => 0,
- 'NEXT' => 0,
'Scalar::Util' => 0,
'SQL::Abstract' => 1.20,
'SQL::Abstract::Limit' => 0.101,
'Tie::IxHash' => 0,
'Storable' => 0,
'Module::Find' => 0,
+ 'Class::C3' => 0.05,
},
recommends => {
'Data::UUID' => 0,
use warnings;
use vars qw($VERSION);
-use base qw/DBIx::Class::Componentised/;
+use base qw/DBIx::Class::Componentised Class::Data::Inheritable/;
$VERSION = '0.03004';
package DBIx::Class::DB;
-use base qw/Class::Data::Inheritable/;
+use base qw/DBIx::Class/;
use DBIx::Class::Storage::DBI;
use DBIx::Class::ClassResolver::PassThrough;
use DBI;
use strict;
use warnings;
-use base qw/Class::Data::Inheritable/;
+use base qw/DBIx::Class/;
__PACKAGE__->mk_classdata('cache');
use warnings;
use Tie::IxHash;
-use base qw/Class::Data::Inheritable/;
+use base qw/DBIx::Class::Row/;
__PACKAGE__->mk_classdata('_primaries' => {});
package DBIx::Class::PK::Auto;
-use base qw/Class::Data::Inheritable/;
+use base qw/DBIx::Class::PK/;
use strict;
use warnings;
use strict;
use warnings;
-use base qw/DBIx::Class Class::Data::Inheritable/;
+use base qw/DBIx::Class/;
__PACKAGE__->load_own_components(qw/
HasMany
use strict;
use warnings;
-use base qw/Class::Data::Inheritable/;
+use base qw/DBIx::Class/;
__PACKAGE__->mk_classdata('_relationships', { } );
use strict;
use warnings;
-use base qw/Class::Data::Inheritable/;
+use base qw/DBIx::Class/;
sub add_relationship {
my ($class, $rel, @rest) = @_;
use strict;
use warnings;
+use base qw/DBIx::Class/;
+
=head1 NAME
DBIx::Class::Row - Basic row methods
use warnings;
use DBIx::Class::DB;
-use base qw/Class::Data::Inheritable/;
use base qw/DBIx::Class/;
__PACKAGE__->load_components(qw/Exception/);
use DBIx::Class::ResultSet;
use Data::Page;
-use base qw/Class::Data::Inheritable/;
+use base qw/DBIx::Class/;
__PACKAGE__->mk_classdata('_columns' => {});
package DBIx::Class::UUIDColumns;
-use base qw/Class::Data::Inheritable/;
+use base qw/DBIx::Class/;
use Data::UUID;