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;

column codepress =>
        label is 'Rich editor',
        hints is 'Use CodePress JavaScript syntax-highlight editor',
        default is 1,
        render_as 'checkbox',
        is mandatory,
        since '0.0.4';

};

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

# Your model-specific methods go here.
1;

1	dpavlin	2	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	dpavlin	36	column codepress =>
21			label is 'Rich editor',
22			hints is 'Use CodePress JavaScript syntax-highlight editor',
23			default is 1,
24			render_as 'checkbox',
25			is mandatory,
26			since '0.0.4';
27
28	dpavlin	2	};
29
30			use Jifty::Plugin::User::Mixin::Model::User;
31			use Jifty::Plugin::Authentication::Password::Mixin::Model::User;
32
33			# Your model-specific methods go here.
34			1;
35