From sugi users.sourceforge.jp Wed Nov 1 12:21:08 2006 From: sugi users.sourceforge.jp (Tatsuki SUGIURA) Date: Wed, 1 Nov 2006 12:21:08 +0900 Subject: [Slashdotjp-dev 638] CVS update: slashjp/debian Message-ID: <20061101032108.969A52AC081@users.sourceforge.jp> Index: slashjp/debian/changelog diff -u slashjp/debian/changelog:1.10 slashjp/debian/changelog:1.11 --- slashjp/debian/changelog:1.10 Mon Oct 30 17:30:10 2006 +++ slashjp/debian/changelog Wed Nov 1 12:21:08 2006 @@ -1,3 +1,9 @@ +slash (2.5.0.119-11) unstable; urgency=low + + * support dirskin in adminmail and counthits. + + -- Tatsuki Sugiura Wed, 1 Nov 2006 12:19:44 +0900 + slash (2.5.0.119-10) unstable; urgency=low * remove obsolete light mode code From sugi users.sourceforge.jp Wed Nov 1 12:21:08 2006 From: sugi users.sourceforge.jp (Tatsuki SUGIURA) Date: Wed, 1 Nov 2006 12:21:08 +0900 Subject: [Slashdotjp-dev 639] CVS update: slashjp/plugins/Stats Message-ID: <20061101032108.B7A002AC094@users.sourceforge.jp> Index: slashjp/plugins/Stats/adminmail.pl diff -u slashjp/plugins/Stats/adminmail.pl:1.5 slashjp/plugins/Stats/adminmail.pl:1.6 --- slashjp/plugins/Stats/adminmail.pl:1.5 Wed Oct 4 17:15:30 2006 +++ slashjp/plugins/Stats/adminmail.pl Wed Nov 1 12:21:08 2006 @@ -2,7 +2,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: adminmail.pl,v 1.5 2006/10/04 08:15:30 sugi Exp $ +# $Id: adminmail.pl,v 1.6 2006/11/01 03:21:08 sugi Exp $ use strict; use Slash::Constants qw( :messages :slashd ); @@ -375,7 +375,7 @@ $statsSave->createStatDaily("${op}_ipids", $uniq); $statsSave->createStatDaily("${op}_bytes", $bytes); $statsSave->createStatDaily("${op}_page", $pages); - if ($op eq "article") { + if ($op =~ m|^(?:[^/]+/)?article$|) { my $avg = $stats->getAverageHitsPerStoryOnDay($yesterday, $pages); $statsSave->createStatDaily("avg_hits_per_story", $avg); } @@ -478,7 +478,7 @@ $statsSave->createStatDaily("${op}_page", $pages, { skid => $skid}); $statsSave->createStatDaily("${op}_user", $users, { skid => $skid}); - if ($op eq "article") { + if ($op =~ m|^(?:[^/]+/)?article$|) { my $avg = $stats->getAverageHitsPerStoryOnDay($yesterday, $pages, { skid => $skid }); $statsSave->createStatDaily("avg_hits_per_story", $avg, { skid => $skid }); } From sugi users.sourceforge.jp Wed Nov 1 12:21:08 2006 From: sugi users.sourceforge.jp (Tatsuki SUGIURA) Date: Wed, 1 Nov 2006 12:21:08 +0900 Subject: [Slashdotjp-dev 640] CVS update: slashjp/themes/slashcode/tasks Message-ID: <20061101032108.DC4BE2AC139@users.sourceforge.jp> Index: slashjp/themes/slashcode/tasks/counthits.pl diff -u slashjp/themes/slashcode/tasks/counthits.pl:1.4 slashjp/themes/slashcode/tasks/counthits.pl:1.5 --- slashjp/themes/slashcode/tasks/counthits.pl:1.4 Wed Jul 12 20:42:09 2006 +++ slashjp/themes/slashcode/tasks/counthits.pl Wed Nov 1 12:21:08 2006 @@ -2,7 +2,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: counthits.pl,v 1.4 2006/07/12 11:42:09 sugi Exp $ +# $Id: counthits.pl,v 1.5 2006/11/01 03:21:08 sugi Exp $ # Counts hits from accesslog and updates stories.hits columns. @@ -14,7 +14,7 @@ use Slash::Utility; use Slash::Constants ':slashd'; -(my $VERSION) = ' $Revision: 1.4 $ ' =~ /\$Revision:\s+([^\s]+)/; +(my $VERSION) = ' $Revision: 1.5 $ ' =~ /\$Revision:\s+([^\s]+)/; # Change this var to change how often the task runs. $minutes_run = 20; @@ -66,7 +66,7 @@ my $qlid = $slashdb->_querylog_start('SELECT', 'accesslog'); my $sth = $logdb->sqlSelectMany("dat", "accesslog", "id BETWEEN $lastmaxid AND $newmaxid - AND status=200 AND op='article'"); + AND status=200 LIKE op='%article'"); while (my($dat) = $sth->fetchrow_array()) { next unless $dat =~ m{^\d+/\d+/\d}; # got 3 sets of digits? good enough $sid_count{$dat}++; From tach users.sourceforge.jp Tue Nov 7 13:36:45 2006 From: tach users.sourceforge.jp (Taku YASUI) Date: Tue, 7 Nov 2006 13:36:45 +0900 Subject: [Slashdotjp-dev 641] CVS update: faq Message-ID: <20061107043645.6F67F2AC01B@users.sourceforge.jp> Index: faq/metamod.shtml diff -u faq/metamod.shtml:1.3 faq/metamod.shtml:1.4 --- faq/metamod.shtml:1.3 Tue Nov 7 13:33:56 2006 +++ faq/metamod.shtml Tue Nov 7 13:36:45 2006 @@ -155,10 +155,10 @@
Last Modified: 5/21/03

-

??????? "????????" ???価???????????????"役???"?????????????M2 ????????????

+

??????? "?????????? ???価???????????????"???????? ?????????????M2 ????????????

-

????????????????????????"????????" ??-"役???" ?????????????影????????????????人? +

????????????????????????"?????????? ??+"???????? ?????????????影????????????????人? ????????????"??" ???????????????????

From tach users.sourceforge.jp Tue Nov 7 20:19:53 2006 From: tach users.sourceforge.jp (Taku YASUI) Date: Tue, 7 Nov 2006 20:19:53 +0900 Subject: [Slashdotjp-dev 642] CVS update: faq Message-ID: <20061107111953.E4CFD2AC03A@users.sourceforge.jp> Index: faq/slashmeta.shtml diff -u faq/slashmeta.shtml:1.3 faq/slashmeta.shtml:1.4 --- faq/slashmeta.shtml:1.3 Tue Nov 7 13:33:56 2006 +++ faq/slashmeta.shtml Tue Nov 7 20:19:53 2006 @@ -249,7 +249,7 @@

?????????????"Free Speech/Free Beer" ????????????

-

?????????????????????????????????????? +

?????????????????????????????????????? ?????????????????????????????????????????? ??????????"free" ???????????2 ???????????? ????Free Speech" ??"free"???????????????????? @@ -263,7 +263,7 @@

?????????????????????? (OSI) ?? ????????????????????? (FSF) ??????????????????? OSI ??????????????????????????????????????????? -????????????FSF ????????????????????????????+????????????FSF ?????????????????????????????? ?????????????????????????????????????????? 大???????????????? From sugi users.sourceforge.jp Wed Nov 8 12:05:41 2006 From: sugi users.sourceforge.jp (Tatsuki SUGIURA) Date: Wed, 8 Nov 2006 12:05:41 +0900 Subject: [Slashdotjp-dev 643] CVS update: slashjp/Slash/Display Message-ID: <20061108030541.C45362AC05D@users.sourceforge.jp> Index: slashjp/Slash/Display/Display.pm diff -u slashjp/Slash/Display/Display.pm:1.8 slashjp/Slash/Display/Display.pm:1.9 --- slashjp/Slash/Display/Display.pm:1.8 Tue Oct 24 20:20:34 2006 +++ slashjp/Slash/Display/Display.pm Wed Nov 8 12:05:41 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: Display.pm,v 1.8 2006/10/24 11:20:34 sugi Exp $ +# $Id: Display.pm,v 1.9 2006/11/08 03:05:41 sugi Exp $ package Slash::Display; @@ -50,7 +50,7 @@ use base 'Exporter'; use vars qw($VERSION @EXPORT @EXPORT_OK $CONTEXT %FILTERS $TEMPNAME); -($VERSION) = ' $Revision: 1.8 $ ' =~ /\$Revision:\s+([^\s]+)/; +($VERSION) = ' $Revision: 1.9 $ ' =~ /\$Revision:\s+([^\s]+)/; @EXPORT = qw(slashDisplay slashDisplayName); @EXPORT_OK = qw(get_template); my(%objects); @@ -358,6 +358,7 @@ strip_plaintext => \&strip_plaintext, strip_mode => [ $strip_mode, 1 ], chopEntity => [ \&chopEntityFactory, 1], + encode_uri_safe => \&encode_uri_safe, %FILTERS ); @@ -587,6 +588,15 @@ }; } +sub encode_uri_safe { + # Do conservative escape. + # This will escape '?', '#', and many non-special chars, + # so mengle like query strings and fragments. Use carefully! + my $s = shift; + $s =~ s|([^0-9a-zA-Z/.,!=~_-]+)|join("%", '', (unpack("H*", $1) =~ m/../g))|eg; + $s; +} + 1; __END__ From sugi users.sourceforge.jp Fri Nov 10 23:53:58 2006 From: sugi users.sourceforge.jp (Tatsuki SUGIURA) Date: Fri, 10 Nov 2006 23:53:58 +0900 Subject: [Slashdotjp-dev 644] CVS update: faq Message-ID: <20061110145358.A780E2AC18A@users.sourceforge.jp> Index: faq/com-mod.shtml diff -u faq/com-mod.shtml:1.3 faq/com-mod.shtml:1.4 --- faq/com-mod.shtml:1.3 Tue Nov 7 13:33:56 2006 +++ faq/com-mod.shtml Fri Nov 10 23:53:58 2006 @@ -24,6 +24,7 @@

平????????????/??????????????????????示????????

+

???????????示?????????簡????????? @@ -49,7 +50,7 @@ Last Modified: 6/12/00
-

?????????????????????

+

?????????????????????

????????????????????????????議????????議??????????????????????????????????????????????????????????????????????????????????????????????????????????????????????稿?????????????????????????対????信???????????????????????確????????????????????????????????????????

(??念??????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????) @@ -59,7 +60,7 @@ Last Modified: 7/10/02
-

??????????????????????????????

+

??????????????????????????????

????????????????????????????正? HTML ????? ?????????????????????????????????????@@ -83,6 +84,7 @@

??????????????????????????????????????????

+

????????????????????????????????? ?????????????示??????? @@ -99,6 +101,7 @@

"First Post" ?????????????

+

"First Post" ???????????????????????????????? ?????????????????????走????????????????? @@ -120,6 +123,7 @@

???????????????????????????対???

+

????????????????????????? @@ -143,6 +147,7 @@

????????????????????????

+

?????? @@ -205,6 +210,7 @@

??????役????????????????"Anonymous Coward"(????????)????????????????????稿????????

+

?????????????????????????????????????????????? ????????????????????????????????????????????人? @@ -218,6 +224,7 @@

????????????稿?????????起????????????????

+

???????????証???????????????山?????????? ???????????????????????????????????????????@@ -234,6 +241,7 @@

???????????稿?????????????????????????????????????????

+

???????????????????????????????eb?????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????弾????????????????????????????????? @@ -246,6 +254,7 @@

???????????????????????????????????

+

????????解??????????????????????????????? @@ -370,6 +379,7 @@

????????????????????????

+

??????????????????????????????? ????????????????????????????????????使???@@ -440,6 +450,7 @@

???????????????

+

?????????????????????????表示??????? ????????????????????? -1 ??5 ??????????????@@ -459,6 +470,7 @@

?????????????

+

?????????主?????????????????????????????? ???????????????????????@@ -515,6 +527,7 @@

??????????????????????????????????????

+

???????????????????????????????????????? ???????????????????????????????????@@ -564,6 +577,7 @@

?????????????????????????

+

????????????????????????????????? ?????????????????????????????????@@ -592,6 +606,7 @@

+1 ???????使?????????????????価????????????????????????!

+

????????????????????稿???????????? ???????????????????????????????????声???@@ -623,6 +638,7 @@

??????? ??????????????????????????????

+

????????????? ??????(??????????????????) ???????????????????????????????? ??????????? @@ -637,6 +653,7 @@

??????????????????????????????

+

????????????????????????????????????? ???????????????????????????度?????????? @@ -652,6 +669,7 @@

????????????????5 ??????????????????? 5 ????????対??????????????????????????????

+

???????????????????????????????????? ?????????????????????????????????????@@ -675,6 +693,7 @@

???????????????????????!

+

????????????????????????????????????????????? ?????????????????????????????????????@@ -690,6 +709,7 @@

?????+1??1)??????????????????(???????????????????????????? ?????????????????????????????????????

+

????????????????????????????????対????????? ??????????????????????????????????????????? @@ -703,6 +723,7 @@

????????

+

??????????????????????????????????????? ????????????????????????????????????????????? @@ -719,6 +740,7 @@

?????????????????人???????? ??????????????????????????

+

???????????????????????????????????????????????? ????????????????????????????????????????????@@ -735,6 +757,7 @@

???? -2 ??? 6 ???????????????????!

+

????????????????????????正?????????????? -1 ??5 ??????????????????????????????? @@ -752,6 +775,7 @@

???????????????????? ?????????

+

???????????????????????????????????????????? 役????????????????????????????????????? @@ -772,6 +796,7 @@

3 ???????????????????!

+

??????????????????????????? 3 ??????????? ????????????????????????????????????????@@ -787,6 +812,7 @@

???????????????????????????稿????????????????????????????

+

??????????????????????????????? ????????????????????????????? @@ -815,6 +841,7 @@

???????????????????????????

+

dkh2 ???????????????紹??????????????役????? ??????????? @@ -878,6 +905,7 @@

????????????????????役??? ??? ???????? ??????????????????????????????????????????????????信??????????????????????????????????? ???????? ????????????????????????????????????????? ??????解決???????????

+

???????人?????????????????????????????????? ?????????????????????????????????????????@@ -894,6 +922,7 @@

??????止??????????????????????????

+

?????????????????????????????????????????????????? ???人? 120 ????????稿??????????????????????????? From sugi users.sourceforge.jp Mon Nov 20 19:32:08 2006 From: sugi users.sourceforge.jp (Tatsuki SUGIURA) Date: Mon, 20 Nov 2006 19:32:08 +0900 Subject: [Slashdotjp-dev 645] CVS update: slashjp/Slash/XML/RSS Message-ID: <20061120103208.C1B892AC0A3@users.sourceforge.jp> Index: slashjp/Slash/XML/RSS/RSS.pm diff -u slashjp/Slash/XML/RSS/RSS.pm:1.4 slashjp/Slash/XML/RSS/RSS.pm:1.5 --- slashjp/Slash/XML/RSS/RSS.pm:1.4 Wed Jul 12 20:41:42 2006 +++ slashjp/Slash/XML/RSS/RSS.pm Mon Nov 20 19:32:08 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.4 2006/07/12 11:41:42 sugi Exp $ +# $Id: RSS.pm,v 1.5 2006/11/20 10:32:08 sugi Exp $ package Slash::XML::RSS; @@ -32,7 +32,7 @@ use base 'Slash::XML'; use vars qw($VERSION); -($VERSION) = ' $Revision: 1.4 $ ' =~ /\$Revision:\s+([^\s]+)/; +($VERSION) = ' $Revision: 1.5 $ ' =~ /\$Revision:\s+([^\s]+)/; #======================================================================== @@ -219,6 +219,10 @@ prefix => 'slash', uri => 'http://purl.org/rss/1.0/modules/slash/', ) if $item->{story}; + $rss->add_module( + prefix => 'content', + uri => 'http://purl.org/rss/1.0/modules/content/', + ); } elsif ($version >= 0.91) { # fix mappings for 0.91 @@ -320,6 +324,14 @@ my $desc = $self->rss_item_description($item->{$key}); $encoded_item->{$key} = $desc if $desc; } + } elsif ($key eq 'content:encoded' && $self->{rdfitem_content}) { + if ($version == 1) { + my $rdfitemdesc_html_bak = $self->{rdfitemdesc_html}; + $self->{rdfitemdesc_html} = 1; + my $encoded = $self->rss_item_description($item->{$key}); + $encoded_item->{content}->{encoded} = "encode($encoded) . "]]>"; + $self->{rdfitemdesc_html} = $rdfitemdesc_html_bak; + } } else { my $data = $item->{$key}; if ($key eq 'link') { @@ -562,4 +574,4 @@ =head1 VERSION -$Id: RSS.pm,v 1.4 2006/07/12 11:41:42 sugi Exp $ +$Id: RSS.pm,v 1.5 2006/11/20 10:32:08 sugi Exp $ From sugi users.sourceforge.jp Mon Nov 20 19:32:08 2006 From: sugi users.sourceforge.jp (Tatsuki SUGIURA) Date: Mon, 20 Nov 2006 19:32:08 +0900 Subject: [Slashdotjp-dev 646] CVS update: slashjp/debian Message-ID: <20061120103208.E28552AC109@users.sourceforge.jp> Index: slashjp/debian/changelog diff -u slashjp/debian/changelog:1.11 slashjp/debian/changelog:1.12 --- slashjp/debian/changelog:1.11 Wed Nov 1 12:21:08 2006 +++ slashjp/debian/changelog Mon Nov 20 19:32:08 2006 @@ -1,3 +1,9 @@ +slash (2.5.0.119-12) unstable; urgency=low + + * add uri_encode_safe filter + + -- Tatsuki Sugiura Wed, 8 Nov 2006 12:57:03 +0900 + slash (2.5.0.119-11) unstable; urgency=low * support dirskin in adminmail and counthits. From sugi users.sourceforge.jp Mon Nov 20 19:32:09 2006 From: sugi users.sourceforge.jp (Tatsuki SUGIURA) Date: Mon, 20 Nov 2006 19:32:09 +0900 Subject: [Slashdotjp-dev 647] CVS update: slashjp/plugins/Journal Message-ID: <20061120103209.1D5E82AC0A3@users.sourceforge.jp> Index: slashjp/plugins/Journal/journal.pl diff -u slashjp/plugins/Journal/journal.pl:1.17 slashjp/plugins/Journal/journal.pl:1.18 --- slashjp/plugins/Journal/journal.pl:1.17 Tue Oct 24 23:08:15 2006 +++ slashjp/plugins/Journal/journal.pl Mon Nov 20 19:32:08 2006 @@ -2,7 +2,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: journal.pl,v 1.17 2006/10/24 14:08:15 sugi Exp $ +# $Id: journal.pl,v 1.18 2006/11/20 10:32:08 sugi Exp $ use strict; use Slash 2.003; # require Slash 2.3.x @@ -13,7 +13,7 @@ use Slash::XML; use vars qw($VERSION); -($VERSION) = ' $Revision: 1.17 $ ' =~ /\$Revision:\s+([^\s]+)/; +($VERSION) = ' $Revision: 1.18 $ ' =~ /\$Revision:\s+([^\s]+)/; sub main { my $journal = getObject('Slash::Journal'); @@ -244,6 +244,7 @@ }, title => $article->[2], description => strip_notags($article->[1]), + 'content:encoded' => balanceTags(strip_mode($article->[1], $article->[4]), { deep_nesting => 1 }), 'link' => root2abs() . '/~' . fixparam($nickname) . "/journal/$article->[3]", }; } From sugi users.sourceforge.jp Tue Nov 21 11:52:57 2006 From: sugi users.sourceforge.jp (Tatsuki SUGIURA) Date: Tue, 21 Nov 2006 11:52:57 +0900 Subject: [Slashdotjp-dev 648] CVS update: slashjp/Slash/XML/RSS Message-ID: <20061121025257.1E1432AC053@users.sourceforge.jp> Index: slashjp/Slash/XML/RSS/RSS.pm diff -u slashjp/Slash/XML/RSS/RSS.pm:1.5 slashjp/Slash/XML/RSS/RSS.pm:1.6 --- slashjp/Slash/XML/RSS/RSS.pm:1.5 Mon Nov 20 19:32:08 2006 +++ slashjp/Slash/XML/RSS/RSS.pm Tue Nov 21 11:52: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.5 2006/11/20 10:32:08 sugi Exp $ +# $Id: RSS.pm,v 1.6 2006/11/21 02:52:56 sugi Exp $ package Slash::XML::RSS; @@ -32,7 +32,7 @@ use base 'Slash::XML'; use vars qw($VERSION); -($VERSION) = ' $Revision: 1.5 $ ' =~ /\$Revision:\s+([^\s]+)/; +($VERSION) = ' $Revision: 1.6 $ ' =~ /\$Revision:\s+([^\s]+)/; #======================================================================== @@ -162,6 +162,9 @@ $self->{rdfitemdesc_html} = defined $param->{rdfitemdesc_html} ? $param->{rdfitemdesc_html} : $constants->{rdfitemdesc_html}; + $self->{rdfitem_content} = defined $param->{rdfitem_content} + ? $param->{rdfitem_content} + : $constants->{rdfitem_content}; my $rss = XML::RSS->new( version => $version, @@ -574,4 +577,4 @@ =head1 VERSION -$Id: RSS.pm,v 1.5 2006/11/20 10:32:08 sugi Exp $ +$Id: RSS.pm,v 1.6 2006/11/21 02:52:56 sugi Exp $ From sugi users.sourceforge.jp Tue Nov 21 11:54:35 2006 From: sugi users.sourceforge.jp (Tatsuki SUGIURA) Date: Tue, 21 Nov 2006 11:54:35 +0900 Subject: [Slashdotjp-dev 649] CVS update: slashjp/debian Message-ID: <20061121025435.C84F02AC053@users.sourceforge.jp> Index: slashjp/debian/changelog diff -u slashjp/debian/changelog:1.12 slashjp/debian/changelog:1.13 --- slashjp/debian/changelog:1.12 Mon Nov 20 19:32:08 2006 +++ slashjp/debian/changelog Tue Nov 21 11:54:35 2006 @@ -1,6 +1,8 @@ slash (2.5.0.119-12) unstable; urgency=low * add uri_encode_safe filter + * add content:encoded in RSS1.0 of journal + (enabled by rdfitem_content variable.) -- Tatsuki Sugiura Wed, 8 Nov 2006 12:57:03 +0900 From sugi users.sourceforge.jp Tue Nov 21 19:22:57 2006 From: sugi users.sourceforge.jp (Tatsuki SUGIURA) Date: Tue, 21 Nov 2006 19:22:57 +0900 Subject: [Slashdotjp-dev 650] CVS update: slashjp/Slash/XML/RSS Message-ID: <20061121102257.1003B2AC14A@users.sourceforge.jp> 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} = "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} = ""; $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 $