use strict;
use warnings;
+use base 'DBIx::Class';
+
sub _register_column_group {
my ($class, $group, @cols) = @_;
return $class->next::method($group => map lc, @cols);
sub add_columns {
my ($class, @cols) = @_;
- return $class->result_source_instance->add_columns(map lc, @cols);
+ return $class->result_source->add_columns(map lc, @cols);
}
sub has_a {