X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F107_no_auto_help.t;h=d3eb5730ad2e955717f7017c5446edfa34ea1297;hb=1f314cdccd9ef11cc0ecb606b5247fc0f9ee0237;hp=f25278009d12df73661e6b79ea5c250f8ad435ef;hpb=da7b9880cfa75cdc3f3a4903e9ed7bfc86b534a3;p=gitmo%2FMooseX-Getopt.git diff --git a/t/107_no_auto_help.t b/t/107_no_auto_help.t index f252780..d3eb573 100644 --- a/t/107_no_auto_help.t +++ b/t/107_no_auto_help.t @@ -7,11 +7,11 @@ # Summary: If we disable the "auto_help" option in Getopt::Long, then # getoptions() will not call into pod2usage() (causing program termination) # when --help is passed (and MooseX::ConfigFromFile is in use). + use strict; use warnings; -use Test::More; - +use Test::More tests => 1; use Test::Requires { 'MooseX::SimpleConfig' => 0.07, # skip all if not installed }; @@ -47,8 +47,6 @@ use Test::Fatal 0.003; END { ok(!$fail_on_exit, 'getoptions() lives'); - done_testing; - # cancel the non-zero exit status from _getopt_full_usage() exit 0; }