X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FReaction%2FTypes%2FDateTime.pm;h=c696d0321353df3af320225bdb701b535fd391ad;hb=1fb2fe93587857afb8b3e4923a4ab726831033d3;hp=491ebe5944fac14b5846be95813800b321c3924f;hpb=bded3808af758db37b44806d6729aeeb603c3341;p=catagits%2FReaction.git diff --git a/lib/Reaction/Types/DateTime.pm b/lib/Reaction/Types/DateTime.pm index 491ebe5..c696d03 100644 --- a/lib/Reaction/Types/DateTime.pm +++ b/lib/Reaction/Types/DateTime.pm @@ -6,19 +6,19 @@ use MooseX::Types use MooseX::Types::Moose qw/Object ArrayRef/; use DateTime; -subtype DateTime - => as Object - => where { $_->isa('DateTime') } - => message { "Must be of the form YYYY-MM-DD HH:MM:SS" }; +subtype DateTime, + as Object, + where { $_->isa('DateTime') }, + message { "Please enter a date and time" }; use DateTime::SpanSet; -subtype SpanSet - => as Object - => where { $_->isa('DateTime::SpanSet') }; +subtype SpanSet, + as Object, + where { $_->isa('DateTime::SpanSet') }; -subtype TimeRangeCollection - => as ArrayRef; +subtype TimeRangeCollection, + as ArrayRef; 1;