From: Matt S Trout Date: Tue, 15 Nov 2005 20:48:44 +0000 (+0000) Subject: Shoved Class::Data::Inheritable into DBIx::Class, more stuff works now X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=1edd17220a3f0fa2768084572d8ca57cfc2a2fcc;p=dbsrgits%2FDBIx-Class-Historic.git Shoved Class::Data::Inheritable into DBIx::Class, more stuff works now --- diff --git a/Build.PL b/Build.PL index 3dd21f9..995fb9e 100644 --- a/Build.PL +++ b/Build.PL @@ -9,7 +9,6 @@ my %arguments = ( 'Data::Page' => 0, 'DBI' => 0, 'UNIVERSAL::require' => 0, - 'NEXT' => 0, 'Scalar::Util' => 0, 'SQL::Abstract' => 1.20, 'SQL::Abstract::Limit' => 0.101, @@ -20,6 +19,7 @@ my %arguments = ( 'Tie::IxHash' => 0, 'Storable' => 0, 'Module::Find' => 0, + 'Class::C3' => 0.05, }, recommends => { 'Data::UUID' => 0, diff --git a/lib/DBIx/Class.pm b/lib/DBIx/Class.pm index b1b7249..daaddc8 100644 --- a/lib/DBIx/Class.pm +++ b/lib/DBIx/Class.pm @@ -4,7 +4,7 @@ use strict; use warnings; use vars qw($VERSION); -use base qw/DBIx::Class::Componentised/; +use base qw/DBIx::Class::Componentised Class::Data::Inheritable/; $VERSION = '0.03004'; diff --git a/lib/DBIx/Class/DB.pm b/lib/DBIx/Class/DB.pm index 7d1b5ca..03c0985 100644 --- a/lib/DBIx/Class/DB.pm +++ b/lib/DBIx/Class/DB.pm @@ -1,6 +1,6 @@ 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; diff --git a/lib/DBIx/Class/ObjectCache.pm b/lib/DBIx/Class/ObjectCache.pm index 5035153..f37d439 100644 --- a/lib/DBIx/Class/ObjectCache.pm +++ b/lib/DBIx/Class/ObjectCache.pm @@ -3,7 +3,7 @@ package DBIx::Class::ObjectCache; use strict; use warnings; -use base qw/Class::Data::Inheritable/; +use base qw/DBIx::Class/; __PACKAGE__->mk_classdata('cache'); diff --git a/lib/DBIx/Class/PK.pm b/lib/DBIx/Class/PK.pm index ab135e0..ddd37b9 100644 --- a/lib/DBIx/Class/PK.pm +++ b/lib/DBIx/Class/PK.pm @@ -4,7 +4,7 @@ use strict; use warnings; use Tie::IxHash; -use base qw/Class::Data::Inheritable/; +use base qw/DBIx::Class::Row/; __PACKAGE__->mk_classdata('_primaries' => {}); diff --git a/lib/DBIx/Class/PK/Auto.pm b/lib/DBIx/Class/PK/Auto.pm index fd2531b..2c368a6 100644 --- a/lib/DBIx/Class/PK/Auto.pm +++ b/lib/DBIx/Class/PK/Auto.pm @@ -1,6 +1,6 @@ package DBIx::Class::PK::Auto; -use base qw/Class::Data::Inheritable/; +use base qw/DBIx::Class::PK/; use strict; use warnings; diff --git a/lib/DBIx/Class/Relationship.pm b/lib/DBIx/Class/Relationship.pm index dce0036..fd9152f 100644 --- a/lib/DBIx/Class/Relationship.pm +++ b/lib/DBIx/Class/Relationship.pm @@ -3,7 +3,7 @@ package DBIx::Class::Relationship; use strict; use warnings; -use base qw/DBIx::Class Class::Data::Inheritable/; +use base qw/DBIx::Class/; __PACKAGE__->load_own_components(qw/ HasMany diff --git a/lib/DBIx/Class/Relationship/Base.pm b/lib/DBIx/Class/Relationship/Base.pm index b1d11a7..b1ca7fb 100644 --- a/lib/DBIx/Class/Relationship/Base.pm +++ b/lib/DBIx/Class/Relationship/Base.pm @@ -3,7 +3,7 @@ package DBIx::Class::Relationship::Base; use strict; use warnings; -use base qw/Class::Data::Inheritable/; +use base qw/DBIx::Class/; __PACKAGE__->mk_classdata('_relationships', { } ); diff --git a/lib/DBIx/Class/Relationship/ProxyMethods.pm b/lib/DBIx/Class/Relationship/ProxyMethods.pm index 51e65e3..0524288 100644 --- a/lib/DBIx/Class/Relationship/ProxyMethods.pm +++ b/lib/DBIx/Class/Relationship/ProxyMethods.pm @@ -3,7 +3,7 @@ package DBIx::Class::Relationship::ProxyMethods; use strict; use warnings; -use base qw/Class::Data::Inheritable/; +use base qw/DBIx::Class/; sub add_relationship { my ($class, $rel, @rest) = @_; diff --git a/lib/DBIx/Class/Row.pm b/lib/DBIx/Class/Row.pm index 0585fd8..061184d 100644 --- a/lib/DBIx/Class/Row.pm +++ b/lib/DBIx/Class/Row.pm @@ -3,6 +3,8 @@ package DBIx::Class::Row; use strict; use warnings; +use base qw/DBIx::Class/; + =head1 NAME DBIx::Class::Row - Basic row methods diff --git a/lib/DBIx/Class/Schema.pm b/lib/DBIx/Class/Schema.pm index 339f236..1c864ea 100644 --- a/lib/DBIx/Class/Schema.pm +++ b/lib/DBIx/Class/Schema.pm @@ -4,7 +4,6 @@ use strict; use warnings; use DBIx::Class::DB; -use base qw/Class::Data::Inheritable/; use base qw/DBIx::Class/; __PACKAGE__->load_components(qw/Exception/); diff --git a/lib/DBIx/Class/Table.pm b/lib/DBIx/Class/Table.pm index 2dfe57b..34e926e 100644 --- a/lib/DBIx/Class/Table.pm +++ b/lib/DBIx/Class/Table.pm @@ -6,7 +6,7 @@ use warnings; use DBIx::Class::ResultSet; use Data::Page; -use base qw/Class::Data::Inheritable/; +use base qw/DBIx::Class/; __PACKAGE__->mk_classdata('_columns' => {}); diff --git a/lib/DBIx/Class/UUIDColumns.pm b/lib/DBIx/Class/UUIDColumns.pm index 97444a1..63df67b 100644 --- a/lib/DBIx/Class/UUIDColumns.pm +++ b/lib/DBIx/Class/UUIDColumns.pm @@ -1,5 +1,5 @@ package DBIx::Class::UUIDColumns; -use base qw/Class::Data::Inheritable/; +use base qw/DBIx::Class/; use Data::UUID;