X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F010_basic_json.t;h=22b42613bae6097b3ce8817ae1fba86150a1df76;hb=619ab942be0a8bd8f530c57ca5b0c8d833cdc89b;hp=7f405e8516db031869b416e38fceefa4e44bed6c;hpb=0c8aa61760399d65724bb75b0735840bba89414d;p=gitmo%2FMooseX-Storage.git diff --git a/t/010_basic_json.t b/t/010_basic_json.t index 7f405e8..22b4261 100644 --- a/t/010_basic_json.t +++ b/t/010_basic_json.t @@ -4,6 +4,7 @@ use strict; use warnings; use Test::More; +use Test::Deep; use Test::Requires { 'Test::JSON' => 0.01, # skip all if not installed @@ -65,8 +66,8 @@ BEGIN { is( $foo->number, 10, '... got the right number' ); is( $foo->string, 'foo', '... got the right string' ); is( $foo->float, 10.5, '... got the right float' ); - is_deeply( $foo->array, [ 1 .. 10 ], '... got the right array' ); - is_deeply( + cmp_deeply( $foo->array, [ 1 .. 10 ], '... got the right array' ); + cmp_deeply( $foo->hash, { map { $_ => undef } ( 1 .. 10 ) }, '... got the right hash'