X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F012_param_json.t;h=b855ef12a8f4598c785513b531db6ed6d904d6b9;hb=5ea6506e2028474a7392705366283b607d2c8abb;hp=e694e1b7041f19aab7f8d4b809ad003131f9e764;hpb=54d6ff364f51d33839d796256e295f165e20fa7b;p=gitmo%2FMooseX-Storage.git

diff --git a/t/012_param_json.t b/t/012_param_json.t
index e694e1b..b855ef1 100644
--- a/t/012_param_json.t
+++ b/t/012_param_json.t
@@ -1,18 +1,17 @@
-#!/usr/bin/perl
-
 use strict;
 use warnings;
 
 use Test::More;
+use Test::Deep;
 
-BEGIN {        
-    local $@;
-    plan skip_all => "MooseX::Storage::Format::JSONpm required for this test"
-        unless eval "require MooseX::Storage::Format::JSONpm; 1";
-}
+use Test::Requires {
+    'MooseX::Storage::Format::JSONpm' => 0.01, # skip all if not installed
+};
 
-plan tests => 6;
-use_ok('MooseX::Storage');
+BEGIN {
+    plan tests => 6;
+    use_ok('MooseX::Storage');
+}
 
 {
     package Foo;
@@ -64,7 +63,7 @@ for my $jsonpm (
 
     my $json = eval { Bar->new(x => 10, y => 20)->freeze({ format => $p }) };
 
-    is_deeply(
+    cmp_deeply(
         JSON->new->decode($json),
         {
             '__CLASS__' => 'Bar-0.01',