X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F300_overloaded.t;h=c1710a495cfed342d3473f2994dbf33a08d8643b;hb=9d3c60f5f35a8d28951049e8daccd9f67c22f9aa;hp=b38ea7f25a7b1e2b54cace961d24560b70f2aa0d;hpb=0b1731882300cdb05aa9fe09716da7a9a03cd00d;p=gitmo%2FMooseX-Storage.git diff --git a/t/300_overloaded.t b/t/300_overloaded.t index b38ea7f..c1710a4 100644 --- a/t/300_overloaded.t +++ b/t/300_overloaded.t @@ -1,7 +1,7 @@ use strict; use warnings; use Test::More; -use Test::Exception; +use Test::Fatal; use Test::Requires { 'JSON::Any' => 0.01, # skip all if not installed @@ -27,9 +27,9 @@ use Test::Requires { my $i = Thing->new(foo => "bar"); -lives_ok { +is( exception { $i . ""; -} 'Can stringify without deep recursion'; +}, undef, 'Can stringify without deep recursion'); done_testing;