diff options
Diffstat (limited to 'lib/WebService/TFL/TubeStatus/Response')
-rw-r--r-- | lib/WebService/TFL/TubeStatus/Response/Line.pm | 10 | ||||
-rw-r--r-- | lib/WebService/TFL/TubeStatus/Response/LineStatus.pm | 7 |
2 files changed, 10 insertions, 7 deletions
diff --git a/lib/WebService/TFL/TubeStatus/Response/Line.pm b/lib/WebService/TFL/TubeStatus/Response/Line.pm index 11d3538..9779443 100644 --- a/lib/WebService/TFL/TubeStatus/Response/Line.pm +++ b/lib/WebService/TFL/TubeStatus/Response/Line.pm @@ -1,23 +1,25 @@ package WebService::TFL::TubeStatus::Response::Line; -use Moose; +use Moo; +use Types::Standard -all; +use WebService::TFL::TubeStatus::Types -all; use WebService::TFL::TubeStatus::Response::LineStatus; use namespace::autoclean; has id => ( is => 'ro', - isa => 'Num', + isa => Num, required => 1, ); has name => ( is => 'ro', - isa => 'Str', + isa => Str, required => 1, ); has status => ( is => 'ro', - isa => 'WebService::TFL::TubeStatus::Response::LineStatus', + isa => LineStatusT, required => 1, ); diff --git a/lib/WebService/TFL/TubeStatus/Response/LineStatus.pm b/lib/WebService/TFL/TubeStatus/Response/LineStatus.pm index e223bb6..6caa7d6 100644 --- a/lib/WebService/TFL/TubeStatus/Response/LineStatus.pm +++ b/lib/WebService/TFL/TubeStatus/Response/LineStatus.pm @@ -1,16 +1,17 @@ package WebService::TFL::TubeStatus::Response::LineStatus; -use Moose; +use Moo; +use Types::Standard -all; use namespace::autoclean; has is_active => ( is => 'ro', - isa => 'Bool', + isa => Bool, required => 1, ); has [qw(code class description details)] => ( is => 'ro', - isa => 'Str', + isa => Str, required => 1, ); |