Tatsuki SUGIURA
sugi****@users*****
2006年 11月 21日 (火) 19:22:57 JST
Index: slashjp/Slash/XML/RSS/RSS.pm diff -u slashjp/Slash/XML/RSS/RSS.pm:1.6 slashjp/Slash/XML/RSS/RSS.pm:1.7 --- slashjp/Slash/XML/RSS/RSS.pm:1.6 Tue Nov 21 11:52:56 2006 +++ slashjp/Slash/XML/RSS/RSS.pm Tue Nov 21 19:22:56 2006 @@ -1,7 +1,7 @@ # This code is a part of Slash, and is released under the GPL. # Copyright 1997-2005 by Open Source Technology Group. See README # and COPYING for more information, or see http://slashcode.com/. -# $Id: RSS.pm,v 1.6 2006/11/21 02:52:56 sugi Exp $ +# $Id: RSS.pm,v 1.7 2006/11/21 10:22:56 sugi Exp $ package Slash::XML::RSS; @@ -32,7 +32,7 @@ use base 'Slash::XML'; use vars qw($VERSION); -($VERSION) = ' $Revision: 1.6 $ ' =~ /\$Revision:\s+([^\s]+)/; +($VERSION) = ' $Revision: 1.7 $ ' =~ /\$Revision:\s+([^\s]+)/; #======================================================================== @@ -332,7 +332,9 @@ my $rdfitemdesc_html_bak = $self->{rdfitemdesc_html}; $self->{rdfitemdesc_html} = 1; my $encoded = $self->rss_item_description($item->{$key}); - $encoded_item->{content}->{encoded} = "<![CDATA[" . $self->encode($encoded) . "]]>"; + # TODO: $self->encode() do NOT work in Unicode-mode. + # TODO: If it works properly, we don't need CDATA quote. + $encoded_item->{content}->{encoded} = "<![CDATA[${encoded}]]>"; $self->{rdfitemdesc_html} = $rdfitemdesc_html_bak; } } else { @@ -577,4 +579,4 @@ =head1 VERSION -$Id: RSS.pm,v 1.6 2006/11/21 02:52:56 sugi Exp $ +$Id: RSS.pm,v 1.7 2006/11/21 10:22:56 sugi Exp $
SRAD