summaryrefslogtreecommitdiff
path: root/lib/WebService/TFL/Bus/Types.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/WebService/TFL/Bus/Types.pm')
-rw-r--r--lib/WebService/TFL/Bus/Types.pm18
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;