burninate documentation for DOM::Tiny
[catagits/DOM-Tiny.git] / t / collection.t
index 91f36b0..b455ba1 100644 (file)
@@ -1,8 +1,10 @@
 use strict;
 use warnings;
 use Test::More;
-use DOM::Tiny::Collection 'c';
-use JSON::Tiny 'encode_json';
+use DOM::Tiny::_Collection;
+use JSON::PP ();
+
+sub c { DOM::Tiny::_Collection->new(@_) }
 
 # Array
 is c(1, 2, 3)->[1], 2, 'right result';
@@ -166,6 +168,6 @@ is_deeply $collection->uniq(join => ',')->flatten->to_array, [1, 2, 2, 1],
   'right result';
 
 # TO_JSON
-is encode_json(c(1, 2, 3)), '[1,2,3]', 'right result';
+is +JSON::PP->new->convert_blessed->encode(c(1, 2, 3)), '[1,2,3]', 'right result';
 
 done_testing();