Leave template view json as a character string

Catalyst will encode it.
metacpan · Aug 27, 2015 · 15e06bd · 15e06bd
1 parent 6dc5c9d
commit 15e06bd
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/lib/MetaCPAN/Web/View/HTML.pm b/lib/MetaCPAN/Web/View/HTML.pm
@@ -90,7 +90,9 @@ Template::Alloy->define_vmethod( 'text',
 Template::Alloy->define_vmethod(
     'hash',
     pretty_json => sub {
-        JSON::MaybeXS->new->utf8->pretty->encode(shift);
+
+    # Use utf8(0) because Catatlyst expects our view to be a character string.
+        JSON::MaybeXS->new->utf8(0)->pretty->encode(shift);
     }
 );