From: Tomas Doran Date: Wed, 9 Feb 2011 16:01:59 +0000 (+0000) Subject: Fix to all use Test::Fatal X-Git-Tag: 0.35~2 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMooseX-Getopt.git;a=commitdiff_plain;h=55c0aed71447be5194cabb929b2301a79cfa4906 Fix to all use Test::Fatal --- diff --git a/t/011_process_argv.t b/t/011_process_argv.t index 01c55bb..d2c1740 100644 --- a/t/011_process_argv.t +++ b/t/011_process_argv.t @@ -4,7 +4,7 @@ use strict; use warnings; use Test::More; -use Test::Exception; +use Test::Fatal 0.003; if ( !eval { require Test::Deep } ) { @@ -38,9 +38,13 @@ else @ARGV = qw(--bar 10 file.dat); my $pa; -lives_ok { - $pa = Testing::Foo->process_argv(baz => 100); -} '... this should work'; +is( + exception { + $pa = Testing::Foo->process_argv(baz => 100); + }, + undef, + '... this should work' +); isa_ok($pa, 'MooseX::Getopt::ProcessedArgv'); Test::Deep::cmp_deeply($pa->argv_copy, [