use strict;
use warnings;
-use NEXT;
-use base qw/Class::Data::Inheritable/;
+use base qw/DBIx::Class::Row/;
__PACKAGE__->mk_classdata('_column_groups' => { });
sub _add_column_group {
my ($class, $group, @cols) = @_;
- $class->_register_column_group($group => @cols);
$class->add_columns(@cols);
+ $class->_register_column_group($group => @cols);
}
sub _register_column_group {