fixed CreditCard type
[catagits/Reaction.git] / lib / Reaction / Types / DBIC.pm
1 package Reaction::Types::DBIC;
2
3 use MooseX::Types
4     -declare => [qw/ResultSet Row/];
5
6 use MooseX::Types::Moose 'Object';
7 use DBIx::Class::ResultSet;
8
9 subtype 'ResultSet'
10   => as 'Object'
11   => where { $_->isa('DBIx::Class::ResultSet') };
12
13 use DBIx::Class::Core;
14 use DBIx::Class::Row;
15
16 subtype 'Row'
17   => as 'Object'
18   => where { $_->isa('DBIx::Class::Row') };
19
20 1;
21
22 =head1 NAME
23
24 Reaction::Types::DBIC
25
26 =head1 DESCRIPTION
27
28 =over
29
30 =item * DBIx::Class::ResultSet
31
32 =item * DBIx::Class::Row
33
34 =back
35
36 =head1 SEE ALSO
37
38 =over
39
40 =item * L<Reaction::Types::Core>
41
42 =back
43
44 =head1 AUTHORS
45
46 See L<Reaction::Class> for authors.
47
48 =head1 LICENSE
49
50 See L<Reaction::Class> for the license.
51
52 =cut