diff options
Diffstat (limited to 'lib/WebService/TFL/TubeStatus.pm')
-rw-r--r-- | lib/WebService/TFL/TubeStatus.pm | 11 |
1 files changed, 5 insertions, 6 deletions
diff --git a/lib/WebService/TFL/TubeStatus.pm b/lib/WebService/TFL/TubeStatus.pm index 79230ce..3b69997 100644 --- a/lib/WebService/TFL/TubeStatus.pm +++ b/lib/WebService/TFL/TubeStatus.pm @@ -1,7 +1,7 @@ package WebService::TFL::TubeStatus; -use Moose; -use Moose::Util::TypeConstraints; -use MooseX::Types::URI 'Uri'; +use Moo; +use Type::Utils -all; +use Types::URI 'Uri'; use XML::LibXML; use XML::LibXML::XPathContext; use WebService::TFL::TubeStatus::Response; @@ -9,8 +9,7 @@ use namespace::autoclean; has user_agent => ( isa => duck_type(['get']), - is => 'ro', - lazy_build => 1, + is => 'lazy', ); sub _build_user_agent { require LWP::UserAgent; @@ -22,7 +21,7 @@ sub _build_user_agent { has uri => ( isa => Uri, is => 'ro', - coerce => 1, + coerce => Uri->coercion, default => 'http://cloud.tfl.gov.uk/TrackerNet/LineStatus', ); |