X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMooseX-Getopt.git;a=blobdiff_plain;f=t%2F011_process_argv.t;h=fdd8136dadd0888a4f3da7553f1b55d56a251d4a;hp=e104d3b94baf229bbdbd23af02e1303ffc66bcc1;hb=25eb430dc9dc0e223b0a8cddf555e0dc3bbd26aa;hpb=66ee5b17ce7666667d3a4bd9d0a4026e57d4a4da diff --git a/t/011_process_argv.t b/t/011_process_argv.t index e104d3b..fdd8136 100644 --- a/t/011_process_argv.t +++ b/t/011_process_argv.t @@ -1,9 +1,9 @@ use strict; -use warnings; +use warnings FATAL => 'all'; -use Test::More tests => 6; +use Test::More tests => 7; use Test::Fatal 0.003; -use Test::Requires 'Test::Deep'; +use Test::Warnings; { package Testing::Foo; @@ -36,17 +36,17 @@ is( ); isa_ok($pa, 'MooseX::Getopt::ProcessedArgv'); -cmp_deeply($pa->argv_copy, [ +is_deeply($pa->argv_copy, [ '--bar', '10', 'file.dat' ], 'argv_copy'); -cmp_deeply($pa->cli_params, { +is_deeply($pa->cli_params, { 'bar' => 10 }, 'cli_params'); -cmp_deeply($pa->constructor_params, { +is_deeply($pa->constructor_params, { 'baz' => 100 }, 'constructor_params'); -cmp_deeply($pa->extra_argv, [ +is_deeply($pa->extra_argv, [ 'file.dat' ], 'extra_argv');