From: Jonathan Rockway Date: Mon, 14 Jan 2008 00:14:12 +0000 (+0000) Subject: Revert "encode unicode to utf8 by default (in finalize)". I need X-Git-Tag: 5.7099_04~97 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=commitdiff_plain;h=51bc4dd200c2363e7d4e86670d46a31045214e8c Revert "encode unicode to utf8 by default (in finalize)". I need to add some tests before checking this in. This reverts commit fb951a66d9ce0be22705975f89278b99697331cd. --- diff --git a/Changes b/Changes index d78cc17..479ba64 100644 --- a/Changes +++ b/Changes @@ -1,9 +1,5 @@ # This file documents the revision history for Perl extension Catalyst. -5.7013 - - convert perl characters to utf8 before output - (Catalyst::Plugin::Unicode no longer needed for output) - 5.7012 2007-12-16 23:44:00 - Fix __PACKAGE__->config->{foo} = 'bar' case with subclassing - Add Catalyst::Stats (Jon Schutz) diff --git a/lib/Catalyst.pm b/lib/Catalyst.pm index 01d0d5f..96ad9a5 100644 --- a/lib/Catalyst.pm +++ b/lib/Catalyst.pm @@ -1335,11 +1335,6 @@ sub finalize { $c->log->error($error); } - # utf8-encode the body (convert perl chars to utf8 on the wire) - if ( $c->response->{body} && utf8::is_utf8($c->response->{body}) ){ - utf8::encode( $c->response->{body} ); - } - # Allow engine to handle finalize flow (for POE) if ( $c->engine->can('finalize') ) { $c->engine->finalize($c);