view release on metacpan or  search on metacpan

t/lib/Schema3/Result/Role.pm  view on Meta::CPAN

package Schema3::Result::Role;
use Modern::Perl;
use base qw/DBIx::Class::Core/;
__PACKAGE__->table('role');
__PACKAGE__->add_columns(
    id   => { data_type => 'integer' },
    role => { data_type => 'varchar', size => 32 },
);
__PACKAGE__->set_primary_key('id');
__PACKAGE__->has_many(
    user_roles => 'Schema3::Result::UserRole',
    'role_id'
);
1;