X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMooseX-Getopt.git;a=blobdiff_plain;f=t%2F003_inferred_option_type.t;fp=t%2F003_inferred_option_type.t;h=e5ceae92017e7d9a1ec0afe0fd992c6096e2dd0a;hp=5624867482e93a51101468468af808f9f15818db;hb=2557b52647dda5b9e090b324d950d4a55db74bae;hpb=d03999d67f2821eaeb230268318be45d3fb11c59 diff --git a/t/003_inferred_option_type.t b/t/003_inferred_option_type.t index 5624867..e5ceae9 100644 --- a/t/003_inferred_option_type.t +++ b/t/003_inferred_option_type.t @@ -13,21 +13,21 @@ BEGIN { package App; use Moose; use Moose::Util::TypeConstraints; - + use Scalar::Util 'looks_like_number'; - + with 'MooseX::Getopt'; subtype 'ArrayOfInts' => as 'ArrayRef' => where { scalar (grep { looks_like_number($_) } @$_) }; - + has 'nums' => ( is => 'ro', isa => 'ArrayOfInts', default => sub { [0] } - ); - + ); + } { @@ -35,8 +35,8 @@ BEGIN { my $app = App->new_with_options; isa_ok($app, 'App'); - - is_deeply($app->nums, [0], '... nums is [0] as expected'); + + is_deeply($app->nums, [0], '... nums is [0] as expected'); } { @@ -44,7 +44,7 @@ BEGIN { my $app = App->new_with_options; isa_ok($app, 'App'); - - is_deeply($app->nums, [3, 5], '... nums is [3, 5] as expected'); + + is_deeply($app->nums, [3, 5], '... nums is [3, 5] as expected'); }