X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F300_immutable%2F007_immutable_trigger_from_constructor.t;h=e8382f02cbaf4393dd4e172af61796fbf3b478ae;hb=b0000b3d2779a5829883471f95f4a8548b486c82;hp=cab557ff8c748abea46bc377926dd94492e1e8ee;hpb=3b8fe109e938b2c1cbd70d8072210dd22cd57f35;p=gitmo%2FMouse.git diff --git a/t/300_immutable/007_immutable_trigger_from_constructor.t b/t/300_immutable/007_immutable_trigger_from_constructor.t index cab557f..e8382f0 100644 --- a/t/300_immutable/007_immutable_trigger_from_constructor.t +++ b/t/300_immutable/007_immutable_trigger_from_constructor.t @@ -3,15 +3,16 @@ use strict; use warnings; -use Test::More tests => 3; +use Test::More; use Test::Exception; - +plan skip_all => "mouse doesn't support Maybe[] yet"; +plan tests => 3; { package AClass; - use Moose; + use Mouse; has 'foo' => (is => 'rw', isa => 'Maybe[Str]', trigger => sub { die "Pulling the Foo trigger\n" @@ -25,7 +26,7 @@ use Test::Exception; __PACKAGE__->meta->make_immutable; #(debug => 1); - no Moose; + no Mouse; } eval { AClass->new(foo => 'bar') };