Commit | Line | Data |
7adfd53f |
1 | package Reaction::Types::DateTime; |
2 | |
e739c9a2 |
3 | use MooseX::Types |
4 | -declare => [qw/DateTime SpanSet TimeRangeCollection/]; |
7adfd53f |
5 | |
e739c9a2 |
6 | use MooseX::Types::Moose qw/Object ArrayRef/; |
7adfd53f |
7 | use DateTime; |
8 | |
bded3808 |
9 | subtype DateTime |
10 | => as Object |
7adfd53f |
11 | => where { $_->isa('DateTime') } |
12 | => message { "Must be of the form YYYY-MM-DD HH:MM:SS" }; |
13 | |
14 | use DateTime::SpanSet; |
15 | |
bded3808 |
16 | subtype SpanSet |
17 | => as Object |
7adfd53f |
18 | => where { $_->isa('DateTime::SpanSet') }; |
19 | |
bded3808 |
20 | subtype TimeRangeCollection |
21 | => as ArrayRef; |
7adfd53f |
22 | |
23 | 1; |
24 | |
25 | =head1 NAME |
26 | |
27 | Reaction::Types::DateTime |
28 | |
29 | =head1 DESCRIPTION |
30 | |
31 | =over |
32 | |
33 | =item * DateTime |
34 | |
35 | =item * DateTime::SpanSet |
36 | |
37 | =item * TimeRangeCollection |
38 | |
39 | =back |
40 | |
41 | =head1 SEE ALSO |
42 | |
43 | =over |
44 | |
45 | =item * L<Reaction::Types::Core> |
46 | |
47 | =back |
48 | |
49 | =head1 AUTHORS |
50 | |
51 | See L<Reaction::Class> for authors. |
52 | |
53 | =head1 LICENSE |
54 | |
55 | See L<Reaction::Class> for the license. |
56 | |
57 | =cut |