X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F200_combined_in_roles.t;h=676dab010b3c8cd71eaf1ee1c7e1ebcee39628e2;hb=50f4ba2be2c8b03eca19ddea5773ffbab8bc2488;hp=f36e1ac2e2c83beb41651c86dfd91ae4e4feba03;hpb=f91430591cdd881aa7bd358615be6df112aee3f9;p=gitmo%2FMooseX-Storage.git diff --git a/t/200_combined_in_roles.t b/t/200_combined_in_roles.t index f36e1ac..676dab0 100755 --- a/t/200_combined_in_roles.t +++ b/t/200_combined_in_roles.t @@ -1,8 +1,7 @@ -#/usr/bin/env perl use strict; use warnings; use Test::More tests => 1; -use Test::Exception; +use Test::Fatal; { package ClassOne; @@ -15,9 +14,9 @@ use Test::Exception; use MooseX::Storage; } -lives_ok { +is( exception { package CombineClasses; use Moose; with qw/ClassOne ClassTwo/; -} 'Can include two roles which both use MooseX::Storage'; +}, undef, 'Can include two roles which both use MooseX::Storage');