1 |
use strict; |
2 |
use warnings; |
3 |
|
4 |
package Perly::Model::Input; |
5 |
use Jifty::DBI::Schema; |
6 |
|
7 |
use Perly::Record schema { |
8 |
|
9 |
column name => |
10 |
label is 'Name', |
11 |
is mandatory, |
12 |
since '0.0.3'; |
13 |
|
14 |
column content => |
15 |
label is 'Content', |
16 |
type is 'text', |
17 |
render_as 'textarea', |
18 |
is mandatory; |
19 |
|
20 |
column owner => |
21 |
refers_to Perly::Model::User by 'id', |
22 |
label is 'Owner', |
23 |
default is defer { Jifty->web->current_user->id || 0 }; |
24 |
|
25 |
column created_on => |
26 |
type is 'timestamp', |
27 |
label is 'Created On', |
28 |
default is defer { DateTime->now }, |
29 |
filters are 'Jifty::DBI::Filter::DateTime'; |
30 |
}; |
31 |
|
32 |
sub since { '0.0.2' }; |
33 |
|
34 |
# Your model-specific methods go here. |
35 |
|
36 |
1; |
37 |
|