added tests for encoding the same data twice with Mojo::JSON

mojolicious · Feb 11, 2014 · 330e659 · 330e659
1 parent 269f65a
commit 330e659
Showing 1 changed file with 8 additions and 0 deletions.
diff --git a/t/mojo/json.t b/t/mojo/json.t
@@ -307,6 +307,14 @@ $num = 1 + $str;
 is $json->encode({test => [$num, $str]}), '{"test":[1,0]}',
   'upgraded number detected';
 
+# Ensure numbers and strings are not upgraded
+$num = 3;
+$str = "three";
+is $json->encode([$num, $str]), '[3,"three"]',
+  'both have been detected correctly';
+is $json->encode([$num, $str]), '[3,"three"]',
+  'both have been detected correctly again';
+
 # "inf" and "nan"
 like $json->encode({test => 9**9**9}), qr/^{"test":".*"}$/,
   'encode "inf" as string';