X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F005_strict.t;h=a5d82c5dcb09685efca2bf92379bcb2269266c49;hb=e4886ef164052bc7a676ef6b69c864171e285b93;hp=dd4c6c3d652f695023a147649d02fbda9ea9bdcb;hpb=eb404494ca0bfd48975259f95272af6d3e689d06;p=gitmo%2FMooseX-Getopt.git diff --git a/t/005_strict.t b/t/005_strict.t index dd4c6c3..a5d82c5 100644 --- a/t/005_strict.t +++ b/t/005_strict.t @@ -4,7 +4,7 @@ use strict; use warnings; use Test::More tests => 10; -use Test::Exception; +use Test::Fatal; BEGIN { use_ok('MooseX::Getopt'); @@ -89,12 +89,12 @@ BEGIN { { local @ARGV = (qw/--private_stuff 317/); - throws_ok { App->new_with_options } qr/Unknown option: private_stuff/; + like exception { App->new_with_options }, qr/Unknown option: private_stuff/; } { local @ARGV = (qw/--length 100/); - throws_ok { App->new_with_options } qr/Unknown option: length/; + like exception { App->new_with_options }, qr/Unknown option: length/; }