0.11
[gitmo/MooseX-Storage.git] / t / 010_basic_json.t
index 30b3327..b589ece 100644 (file)
@@ -5,15 +5,9 @@ use warnings;
 
 use Test::More;
 
-BEGIN {
+BEGIN {        
     eval "use Test::JSON";
-    plan skip_all => "Test::JSON is required for this test" if $@; 
-    # NOTE: 
-    # this idiocy is cause Test::JSON 
-    # uses JSON.pm and that can be 
-    # very picky about the JSON output
-    # - SL 
-    BEGIN { $ENV{JSON_ANY_ORDER} = qw(JSON) }           
+    plan skip_all => "Test::JSON is required for this test" if $@;            
     plan tests => 12;
     use_ok('MooseX::Storage');
 }
@@ -49,11 +43,13 @@ BEGIN {
 
     is_valid_json($json, '.. this is valid JSON');
 
+
     is_json(
         $json,
 '{"array":[1,2,3,4,5,6,7,8,9,10],"hash":{"6":null,"3":null,"7":null,"9":null,"2":null,"8":null,"1":null,"4":null,"10":null,"5":null},"float":10.5,"object":{"number":2,"__CLASS__":"Foo"},"number":10,"__CLASS__":"Foo","string":"foo"}',
         '... got the right JSON'
     );
+
 }
 
 {