Getting rid of worthless encoding.

This commit is contained in:
JT Smith 2003-05-05 05:20:21 +00:00
parent 8f6348a5bb
commit 54da10933f
3 changed files with 3 additions and 8 deletions

View file

@ -20,11 +20,6 @@ save you many hours of grief.
sitename = www.mycompany.com
5.2.5
--------------------------------------------------------------------
* You'll need to upgrade HTML::Parser to at least version 3.27.
5.2.0
--------------------------------------------------------------------
* You'll need to add a section to the style sheet of each one of

View file

@ -19,7 +19,7 @@ QnD INSTALL INSTRUCTIONS:
DBD::mysql
Digest::MD5
Date::Calc
HTML::Parser (3.27+)
HTML::Parser
Image::Magick (optional)
Cache::FileCache (optional)

View file

@ -86,8 +86,8 @@ sub www_view {
unless (defined $rssFile) {
$rssFile = $cache->setByHTTP($_[0]->get("rssUrl"),3600);
}
$rssFile =~ s#(<title>)(.*?)(</title>)#$1.HTML::Entities::encode_entities_numeric(decode_entities($2)).$3#ges;
$rssFile =~ s#(<description>)(.*?)(</description>)#$1.HTML::Entities::encode_entities_numeric(decode_entities($2)).$3#ges;
$rssFile =~ s#(<title>)(.*?)(</title>)#$1.HTML::Entities::encode_entities(decode_entities($2)).$3#ges;
$rssFile =~ s#(<description>)(.*?)(</description>)#$1.HTML::Entities::encode_entities(decode_entities($2)).$3#ges;
eval{parseRSS(\%rss, \$rssFile)};
if ($@) {
WebGUI::ErrorHandler::warn($_[0]->get("rssUrl")." ".$@);