Commit | Line | Data |
7adfd53f |
1 | package Reaction::Types::File; |
2 | |
e739c9a2 |
3 | use MooseX::Types |
4 | -declare => [qw/File/]; |
7adfd53f |
5 | |
e739c9a2 |
6 | use MooseX::Types::Moose 'Object'; |
7adfd53f |
7 | use Catalyst::Request::Upload; |
8 | |
bded3808 |
9 | subtype File |
10 | => as Object |
7adfd53f |
11 | => where { $_->isa('Catalyst::Request::Upload') } |
12 | => message { "Must be a file" }; |
13 | |
14 | 1; |
15 | |
16 | =head1 NAME |
17 | |
18 | Reaction::Types::File |
19 | |
20 | =head1 DESCRIPTION |
21 | |
22 | =over |
23 | |
24 | =item * File |
25 | |
26 | =back |
27 | |
28 | =head1 SEE ALSO |
29 | |
30 | =over |
31 | |
32 | =item * L<Reaction::Types::Core> |
33 | |
34 | =back |
35 | |
36 | =head1 AUTHORS |
37 | |
38 | See L<Reaction::Class> for authors. |
39 | |
40 | =head1 LICENSE |
41 | |
42 | See L<Reaction::Class> for the license. |
43 | |
44 | =cut |