apply with_JSON_XS_v2.patch from RT#94892

[p5sagit/JSON-MaybeXS.git] / t / cpanel.t

diff --git a/t/cpanel.t b/t/cpanel.t
new file mode 100644 (file)
index 0000000..5ffa55f
--- /dev/null
+++ b/t/cpanel.t
@@ -0,0 +1,24 @@
+use strict;
+use warnings FATAL => 'all';
+use Test::More;
+use JSON::MaybeXS;
+
+unless ( eval { require Cpanel::JSON::XS; 1 } ) {
+    plan skip_all => 'Cpanel::JSON::XS not installed';
+    done_testing;
+    exit;
+}
+
+is( JSON, 'Cpanel::JSON::XS', 'Correct JSON class' );
+
+is( \&encode_json,
+    \&Cpanel::JSON::XS::encode_json,
+    'Correct encode_json function'
+);
+
+is( \&decode_json,
+    \&Cpanel::JSON::XS::decode_json,
+    'Correct encode_json function'
+);
+
+done_testing;