From 75fe8d4a588abd4da62685ab64dfcaafc07cfae6 Mon Sep 17 00:00:00 2001 From: Gianni Ceccarelli Date: Thu, 7 Nov 2013 11:59:14 +0000 Subject: migrate to Moo: bus client --- lib/WebService/TFL/Bus/Request.pm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'lib/WebService/TFL/Bus/Request.pm') diff --git a/lib/WebService/TFL/Bus/Request.pm b/lib/WebService/TFL/Bus/Request.pm index cf35459..dda6586 100644 --- a/lib/WebService/TFL/Bus/Request.pm +++ b/lib/WebService/TFL/Bus/Request.pm @@ -1,5 +1,6 @@ package WebService::TFL::Bus::Request; -use Moose; +use Moo; +use Types::Standard -all; use WebService::TFL::Bus::Fields; use namespace::autoclean; @@ -12,7 +13,7 @@ for my $field (WebService::TFL::Bus::Fields->query_fields) { has ReturnList => ( is => 'rw', - isa => 'ArrayRef', + isa => ArrayRef, predicate => 'has_ReturnList', ); -- cgit v1.2.3