Someone

sub new {
    my ( $class, $attrs ) = @_;
    my $ret = $class->next::method($attrs);
    $ret->result_source->add_columns(qw/type/);
}