X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F107_union_bug.t;fp=t%2F107_union_bug.t;h=9f78fb5410b092e677037d7251f23c200473fb0e;hb=8fb3af531d96f3fa9314b3c1affc6d2cae6e1586;hp=1dcba21f26f4c360b65e34a25e4afc753ae21fcd;hpb=218ebb555b5440c13a3d4ff8f089e344b963db60;p=gitmo%2FMooseX-Getopt.git diff --git a/t/107_union_bug.t b/t/107_union_bug.t index 1dcba21..9f78fb5 100644 --- a/t/107_union_bug.t +++ b/t/107_union_bug.t @@ -3,7 +3,7 @@ use strict; use warnings; -use Test::Most tests => 5; +use Test::More; { package example; @@ -49,8 +49,7 @@ use Test::Most tests => 5; other => 'test', }); isa_ok($example, 'example'); - explain($example->results); - cmp_deeply($example->results, [qw(1234 5678 9012)], 'result as expected'); + is_deeply($example->results, [qw(1234 5678 9012)], 'result as expected'); } # With MooseX::Getopt @@ -59,7 +58,9 @@ use Test::Most tests => 5; my $example = example->new_with_options; isa_ok($example, 'example'); - explain($example->results); is($example->other,'test'); - cmp_deeply($example->results, [qw(1234 5678 9012)], 'result as expected'); + is_deeply($example->results, [qw(1234 5678 9012)], 'result as expected'); } + +done_testing; +