[Catalyst-commits] r6865 - in trunk: .
Catalyst-Plugin-Unicode/lib/Catalyst/Plugin
jrockway at dev.catalyst.perl.org
jrockway at dev.catalyst.perl.org
Wed Sep 12 11:36:49 GMT 2007
Author: jrockway
Date: 2007-09-12 11:36:49 +0100 (Wed, 12 Sep 2007)
New Revision: 6865
Modified:
trunk/
trunk/Catalyst-Plugin-Unicode/lib/Catalyst/Plugin/Unicode.pm
Log:
r28664 at foo: jon | 2007-09-12 04:40:24 -0500
encode everything, even XML :)
Property changes on: trunk
___________________________________________________________________
Name: svk:merge
- 6d2a1d83-d666-409f-9dbf-d3bfcf4e9009:/local_branches/Catalyst-bad-mst/trunk:40156
6d2a1d83-d666-409f-9dbf-d3bfcf4e9009:/local_branches/Catalyst-broken-net/trunk:19004
6d2a1d83-d666-409f-9dbf-d3bfcf4e9009:/local_branches/Catalyst_acl_in_conf/trunk:3134
d7608cd0-831c-0410-93c0-e5b306c3c028:/local/Catalyst-trunk:28533
d7608cd0-831c-0410-93c0-e5b306c3c028:/local/Catalyst/trunk:7830
dd8ad9ea-0304-0410-a433-df5f223e7bc0:/local/Catalyst/trunk:7023
+ 6d2a1d83-d666-409f-9dbf-d3bfcf4e9009:/local_branches/Catalyst-bad-mst/trunk:40156
6d2a1d83-d666-409f-9dbf-d3bfcf4e9009:/local_branches/Catalyst-broken-net/trunk:19004
6d2a1d83-d666-409f-9dbf-d3bfcf4e9009:/local_branches/Catalyst_acl_in_conf/trunk:3134
d7608cd0-831c-0410-93c0-e5b306c3c028:/local/Catalyst-trunk:28664
d7608cd0-831c-0410-93c0-e5b306c3c028:/local/Catalyst/trunk:7830
dd8ad9ea-0304-0410-a433-df5f223e7bc0:/local/Catalyst/trunk:7023
Modified: trunk/Catalyst-Plugin-Unicode/lib/Catalyst/Plugin/Unicode.pm
===================================================================
--- trunk/Catalyst-Plugin-Unicode/lib/Catalyst/Plugin/Unicode.pm 2007-09-12 10:36:33 UTC (rev 6864)
+++ trunk/Catalyst-Plugin-Unicode/lib/Catalyst/Plugin/Unicode.pm 2007-09-12 10:36:49 UTC (rev 6865)
@@ -2,22 +2,16 @@
use strict;
-our $VERSION = '0.5';
+our $VERSION = '0.6';
sub finalize {
my $c = shift;
-
- unless ( $c->response->body ) {
- return $c->NEXT::finalize;
+
+ if ( $c->response->{body} && utf8::is_utf8($c->response->{body}) ){
+ utf8::encode( $c->response->{body} );
}
-
- unless ( $c->response->content_type =~ /^text/ ) {
- return $c->NEXT::finalize;
- }
- utf8::encode( $c->response->{body} );
-
- $c->NEXT::finalize;
+ return $c->NEXT::finalize;
}
sub prepare_parameters {
More information about the Catalyst-commits
mailing list