[Catalyst-commits] r6658 -
trunk/Catalyst-Plugin-Unicode/lib/Catalyst/Plugin
jrockway at dev.catalyst.perl.org
jrockway at dev.catalyst.perl.org
Mon Aug 13 18:13:59 GMT 2007
Author: jrockway
Date: 2007-08-13 18:13:58 +0100 (Mon, 13 Aug 2007)
New Revision: 6658
Modified:
trunk/Catalyst-Plugin-Unicode/lib/Catalyst/Plugin/Unicode.pm
Log:
always encode
Modified: trunk/Catalyst-Plugin-Unicode/lib/Catalyst/Plugin/Unicode.pm
===================================================================
--- trunk/Catalyst-Plugin-Unicode/lib/Catalyst/Plugin/Unicode.pm 2007-08-13 13:02:20 UTC (rev 6657)
+++ trunk/Catalyst-Plugin-Unicode/lib/Catalyst/Plugin/Unicode.pm 2007-08-13 17:13:58 UTC (rev 6658)
@@ -2,7 +2,7 @@
use strict;
-our $VERSION = '0.4';
+our $VERSION = '0.5';
sub finalize {
my $c = shift;
@@ -14,13 +14,9 @@
unless ( $c->response->content_type =~ /^text/ ) {
return $c->NEXT::finalize;
}
-
- unless ( utf8::is_utf8( $c->response->body ) ) {
- return $c->NEXT::finalize;
- }
-
+
utf8::encode( $c->response->{body} );
-
+
$c->NEXT::finalize;
}
More information about the Catalyst-commits
mailing list