X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=dbsrgits%2FDBIx-Class.git;a=blobdiff_plain;f=lib%2FDBIx%2FClass.pm;h=6d75377bae6fcb2c7a3e77fd7e1147c832570e8c;hp=c97728838e7cf676ef152d73a816b3dbbd4ab604;hb=3e11041012dc26df94860efefde4340bf927f2af;hpb=665256a6662526fe0488aa09e2d99339f0b9b96f

diff --git a/lib/DBIx/Class.pm b/lib/DBIx/Class.pm
index c977288..6d75377 100644
--- a/lib/DBIx/Class.pm
+++ b/lib/DBIx/Class.pm
@@ -4,9 +4,14 @@ use strict;
 use warnings;
 
 use vars qw($VERSION);
-use base qw/DBIx::Class::Componentised Class::Data::Accessor/;
+use base qw/DBIx::Class::Componentised Class::Accessor::Grouped/;
+
+sub mk_classdata { 
+    my $self = shift;
+    $self->mk_group_accessors('inherited', $_[0]); 
+    $self->set_inherited(@_) if @_ > 1;
+}
 
-sub mk_classdata { shift->mk_classaccessor(@_); }
 sub component_base_class { 'DBIx::Class' }
 
 # Always remember to do all digits for the version even if they're 0