diff options
Diffstat (limited to 'lib/WebService/TFL/Bus/Types.pm')
-rw-r--r-- | lib/WebService/TFL/Bus/Types.pm | 18 |
1 files changed, 10 insertions, 8 deletions
diff --git a/lib/WebService/TFL/Bus/Types.pm b/lib/WebService/TFL/Bus/Types.pm index 9b569f5..e67fe32 100644 --- a/lib/WebService/TFL/Bus/Types.pm +++ b/lib/WebService/TFL/Bus/Types.pm @@ -1,12 +1,14 @@ package WebService::TFL::Bus::Types; -use MooseX::Types -declare => [ - 'DateTimeMillis' -]; -use MooseX::Types::Moose 'Num'; -use MooseX::Types::DateTime 'DateTime'; +use Type::Library -base, -declare => 'DateTimeMillis'; +use Types::Standard -all; +use Type::Utils -all; +use Types::DateTime 'DateTimeT'; +use namespace::autoclean; -subtype DateTimeMillis, as DateTime; -coerce DateTimeMillis, from Num, - via { 'DateTime'->from_epoch( epoch => $_ / 1000 ) }; +declare DateTimeMillis, as DateTimeT; +coerce DateTimeMillis, from Num, via { + require DateTime; + DateTime->from_epoch( epoch => $_ / 1000 ) +}; 1; |