X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMooseX-Getopt.git;a=blobdiff_plain;f=t%2F112_configfile_constructor_arg.t;h=4b83b071fd8452c0da964e982a253a13077564cc;hp=2435cfc9f8ecbc26be1ea28ea34791dfec604908;hb=25eb430dc9dc0e223b0a8cddf555e0dc3bbd26aa;hpb=e202fd48ff22367bb28fd3aef438a301aa3e87a9 diff --git a/t/112_configfile_constructor_arg.t b/t/112_configfile_constructor_arg.t index 2435cfc..4b83b07 100644 --- a/t/112_configfile_constructor_arg.t +++ b/t/112_configfile_constructor_arg.t @@ -1,12 +1,12 @@ use strict; -use warnings; +use warnings FATAL => 'all'; # respect the configfile value passed into the constructor. use Test::Requires 'MooseX::SimpleConfig'; # skip all if not installed use Test::More tests => 3; -use Test::NoWarnings 1.04 ':early'; -use Path::Tiny; +use Test::Warnings; +use Path::Tiny 0.009; # avoid warning if all we have installed is YAML or YAML::Syck - the user will # see this eventually when he actually uses MooseX::SimpleConfig in his own @@ -31,7 +31,7 @@ $Config::Any::YAML::NO_YAML_XS_WARNING = 1; my $obj = Foo->new_with_options(configfile => $configfile); is( - $obj->configfile, + path($obj->configfile), $configfile, 'configfile value is used from the constructor', );