view release on metacpan or  search on metacpan

t/lib/Schema2/Result/Myuser.pm  view on Meta::CPAN

package Schema2::Result::Myuser;
use Modern::Perl;
use base qw/DBIx::Class::Core/;
__PACKAGE__->table('myuser');
__PACKAGE__->add_columns(
    id       => { data_type => 'integer', is_auto_increment => 1 },
    myusername => { data_type => 'varchar', size => 32 },
    mypassword => { data_type => 'varchar', size => 40, is_nullable => 1 },
    name     => { data_type => 'varchar', size => 128, is_nullable => 1 },
    email    => { data_type => 'varchar', size => 255, is_nullable => 1 },
    deleted  => { data_type => 'boolean', default_value => 0 },
    lastlogin => { data_type => 'datetime', is_nullable => 1 },
    pw_changed => { data_type => 'datetime', is_nullable => 1 },
    pw_reset_code => { data_type => 'varchar', size => 255, is_nullable => 1 },
);
__PACKAGE__->set_primary_key('id');
__PACKAGE__->add_unique_constraint(['myusername']);
__PACKAGE__->has_many(
    myuser_roles => 'Schema2::Result::MyuserRole',
    'user_id'
);
1;