X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F07-parameterized-role.t;h=ba28077094ae1bd710eacf8b7cab56e1471e5dd2;hb=4b757b92cd9512ae47b6a60c8bec740e8810e96e;hp=9fb958894b8a660844b2978bf33af2e3a8c5aab6;hpb=7373322235b236c080359e790c8ad7124b5dc3b2;p=gitmo%2FMooseX-ClassAttribute.git diff --git a/t/07-parameterized-role.t b/t/07-parameterized-role.t index 9fb9588..ba28077 100644 --- a/t/07-parameterized-role.t +++ b/t/07-parameterized-role.t @@ -2,7 +2,7 @@ use strict; use warnings; use Test::More; -use Test::Exception; +use Test::Fatal; use Test::Requires { 'MooseX::Role::Parameterized' => '0', @@ -37,10 +37,13 @@ plan skip_all => my $instance = Class->new(); isa_ok( $instance, 'Class' ); -lives_and { - $instance->foo('bar'); - is( $instance->foo(), 'bar' ); -} -'used class attribute from parameterized role'; +is( + exception { + $instance->foo('bar'); + is( $instance->foo(), 'bar' ); + }, + undef, + 'used class attribute from parameterized role' +); done_testing();