X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F004_nogetop.t;h=a4c4455fb18f37ae80c0802109a0f00b06a01842;hb=da7b9880cfa75cdc3f3a4903e9ed7bfc86b534a3;hp=c5c222c92d6f17104aadc43ea775e2a3b424b014;hpb=d08ef824ff9b41efb8fbbc09fe6af178ef83080b;p=gitmo%2FMooseX-Getopt.git diff --git a/t/004_nogetop.t b/t/004_nogetop.t index c5c222c..a4c4455 100644 --- a/t/004_nogetop.t +++ b/t/004_nogetop.t @@ -1,10 +1,8 @@ -#!/usr/bin/perl - use strict; use warnings; use Test::More tests => 9; -use Test::Exception 0.21; +use Test::Fatal 0.003; BEGIN { use_ok('MooseX::Getopt'); @@ -98,5 +96,5 @@ 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/; }