X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F300_immutable%2F003_immutable_meta_class.t;h=2f540d6d8063827bf346f5a8d11488a294a94d3b;hb=b10dde3a27c11623547417c599ccbd4f92e42651;hp=1a1b662cdbe1ba36f2b0966f0cdf7af5f6567f00;hpb=d4e538d9bf46d1c14d2ecfd36ac35ed541ae7ee6;p=gitmo%2FMoose.git diff --git a/t/300_immutable/003_immutable_meta_class.t b/t/300_immutable/003_immutable_meta_class.t index 1a1b662..2f540d6 100644 --- a/t/300_immutable/003_immutable_meta_class.t +++ b/t/300_immutable/003_immutable_meta_class.t @@ -4,7 +4,7 @@ use strict; use warnings; use Test::More; -use Test::Exception; +use Test::Fatal; { @@ -20,8 +20,8 @@ use Test::Exception; ); } -lives_ok { +is( exception { My::Meta->meta()->make_immutable(debug => 0) -} '... can make a meta class immutable'; +}, undef, '... can make a meta class immutable' ); done_testing;