no need for paranoid over-stringification, again

moritz · Dec 21, 2011 · 89e7d18 · 89e7d18
1 parent 48a34c5
commit 89e7d18
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/JSON/Tiny.pm b/lib/JSON/Tiny.pm
@@ -24,7 +24,7 @@ multi to-json(Real:D $d) { ~$d }
 multi to-json(Bool:D $d) { $d ?? 'true' !! 'false'; }
 multi to-json(Str:D  $d) {
     '"'
-    ~ (~$d).trans(['"',  '\\',   "\b", "\f", "\n", "\r", "\t"]
+    ~ $d.trans(['"',  '\\',   "\b", "\f", "\n", "\r", "\t"]
             => ['\"', '\\\\', '\b', '\f', '\n', '\r', '\t'])\
             .subst(/<-[\c32..\c126]>/, { ord(~$_).fmt('\u%04x') }, :g)
     ~ '"'