Perly/Model/User.pm

use strict;
use warnings;

package Perly::Model::User;
use Jifty::DBI::Schema;

use Perly::Record schema {

column name =>
    label is 'Username',
    hints is 'Other people see this when you do something.',
    is distinct, is mandatory;

column email =>
    label is 'Email',
    hints is 'We will not sell it to anybody. Honest.',
    default is '',
    is distinct, is immutable;

};

use Jifty::Plugin::User::Mixin::Model::User;
use Jifty::Plugin::Authentication::Password::Mixin::Model::User;

# Your model-specific methods go here.
1;

1	use strict;
2	use warnings;
3
4	package Perly::Model::User;
5	use Jifty::DBI::Schema;
6
7	use Perly::Record schema {
8
9	column name =>
10	label is 'Username',
11	hints is 'Other people see this when you do something.',
12	is distinct, is mandatory;
13
14	column email =>
15	label is 'Email',
16	hints is 'We will not sell it to anybody. Honest.',
17	default is '',
18	is distinct, is immutable;
19
20	};
21
22	use Jifty::Plugin::User::Mixin::Model::User;
23	use Jifty::Plugin::Authentication::Password::Mixin::Model::User;
24
25	# Your model-specific methods go here.
26	1;
27