projects
/
dbsrgits/DBIx-Class-Historic.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
blame
|
history
|
raw
|
HEAD
added TODO test: call accessors when create()ing a row
[dbsrgits/DBIx-Class-Historic.git]
/
t
/
lib
/
DBICTest
/
Schema
/
Money.pm
1
package # hide from PAUSE
2
DBICTest::Schema::Money;
3
4
use base qw/DBICTest::BaseResult/;
5
6
__PACKAGE__->table('money_test');
7
8
__PACKAGE__->add_columns(
9
'id' => {
10
data_type => 'integer',
11
is_auto_increment => 1,
12
},
13
'amount' => {
14
data_type => 'money',
15
is_nullable => 1,
16
},
17
);
18
19
__PACKAGE__->set_primary_key('id');
20
21
1;