[Catalyst-commits] r7386 - in Catalyst-Runtime/5.70/trunk: . lib

[jrockway at dev.catalyst.perl.org]

Author: jrockway
Date: 2008-01-14 00:14:12 +0000 (Mon, 14 Jan 2008)
New Revision: 7386

Modified:
   Catalyst-Runtime/5.70/trunk/Changes
   Catalyst-Runtime/5.70/trunk/lib/Catalyst.pm
Log:
Revert "encode unicode to utf8 by default (in finalize)".  I need
to add some tests before checking this in.

This reverts commit fb951a66d9ce0be22705975f89278b99697331cd.


Modified: Catalyst-Runtime/5.70/trunk/Changes
===================================================================
--- Catalyst-Runtime/5.70/trunk/Changes	2008-01-14 00:12:29 UTC (rev 7385)
+++ Catalyst-Runtime/5.70/trunk/Changes	2008-01-14 00:14:12 UTC (rev 7386)
@@ -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)

Modified: Catalyst-Runtime/5.70/trunk/lib/Catalyst.pm
===================================================================
--- Catalyst-Runtime/5.70/trunk/lib/Catalyst.pm	2008-01-14 00:12:29 UTC (rev 7385)
+++ Catalyst-Runtime/5.70/trunk/lib/Catalyst.pm	2008-01-14 00:14:12 UTC (rev 7386)
@@ -1335,11 +1335,6 @@
         $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);