From: Dave Rolsky Date: Thu, 21 Oct 2010 20:36:08 +0000 (-0500) Subject: Small formatting tweaks and remove unused code X-Git-Tag: 1.18~74 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=88334003410f9ee2a1db61db04716a1f1a751209;p=gitmo%2FMoose.git Small formatting tweaks and remove unused code --- diff --git a/t/070_native_traits/013_array_coerce.t b/t/070_native_traits/013_array_coerce.t index 88f2845..0b54582 100644 --- a/t/070_native_traits/013_array_coerce.t +++ b/t/070_native_traits/013_array_coerce.t @@ -100,7 +100,8 @@ my $foo = Foo->new; use Moose; has thing => ( - is => 'ro', isa => 'Str', + is => 'ro', + isa => 'Str', ); } @@ -113,22 +114,18 @@ my $foo = Foo->new; coerce 'Thing' => from 'Str' - => via { Thing->new(thing => $_) }; + => via { Thing->new( thing => $_ ) }; subtype 'ArrayRefOfThings' => as 'ArrayRef[Thing]'; coerce 'ArrayRefOfThings' => from 'ArrayRef[Str]' - => via { [ map { Thing->new(thing => $_) } @$_ ] }; + => via { [ map { Thing->new( thing => $_ ) } @{$_} ] }; coerce 'ArrayRefOfThings' => from 'Str' - => via { [ Thing->new(thing => $_) ] }; - - coerce 'ArrayRefOfThings' - => from 'Thing' - => via { [ $_ ] }; + => via { [ Thing->new( thing => $_ ) ] }; has array => ( traits => ['Array'],