X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F800_shikabased%2F001-coerce.t;fp=t%2F800_shikabased%2F001-coerce.t;h=42093c1c2091040f5001aac23d0dedfe582cae12;hb=4c0e2aa7665fbf173a9b0c4827d4cd3cfb5cbd0b;hp=5b19a5b2de41512b08e2a4ade0b69ea9787e1873;hpb=3d3b9c8ad9ca9293d20e12e6630f69b94684d134;p=gitmo%2FMouse.git diff --git a/t/800_shikabased/001-coerce.t b/t/800_shikabased/001-coerce.t index 5b19a5b..42093c1 100644 --- a/t/800_shikabased/001-coerce.t +++ b/t/800_shikabased/001-coerce.t @@ -13,7 +13,7 @@ use Test::More tests => 6; use Mouse; use Mouse::Util::TypeConstraints; - subtype 'HeadersType' => as 'Object' => where { defined $_ && eval { $_->isa('Headers') } }; + subtype 'HeadersType' => as 'Object' => where { $_->isa('Headers') }; coerce 'HeadersType' => from 'ScalarRef' => via { Headers->new();