oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fixed some syndicated content bugs

Browse source
This commit is contained in:
JT Smith 2005-09-13 21:17:18 +00:00
parent 01aad32c08
commit 5feae6f617
2 changed files with 8 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

5
docs/changelog/6.x.x.txt
View file

@ -1,3 +1,8 @@
6.7.5
- Fixed a syntax error in Syndicated Content.
- Fixed an infinite loop problem in Syndicated Content when no URLs were
specified.
6.7.4 6.7.4
- fix [ 1279861 ] POD errors in 6.7.3 - fix [ 1279861 ] POD errors in 6.7.3
- fix [ 1287994 ] POD errors in 6.7.4 - fix [ 1287994 ] POD errors in 6.7.4

6
lib/WebGUI/Asset/Wobject/SyndicatedContent.pm
View file

@ -125,7 +125,7 @@ sub definition {
icon=>'syndicatedContent.gif', icon=>'syndicatedContent.gif',
tableName=>'SyndicatedContent', tableName=>'SyndicatedContent',
className=>'WebGUI::Asset::Wobject::SyndicatedContent', className=>'WebGUI::Asset::Wobject::SyndicatedContent',
properties=>%properties properties=>\%properties
}); });
return $class->SUPER::definition($definition); return $class->SUPER::definition($definition);
} }
@ -235,7 +235,7 @@ sub _normalize_items {
sub _get_rss_data { sub _get_rss_data {
my $url = shift; my $url = shift;
my $cache = WebGUI::Cache->new('url:' . $url, 'RSS'); my $cache = WebGUI::Cache->new('url:' . $url, 'RSS');
my $rss_serial = $cache->get; my $rss_serial = $cache->get;
my $rss = {}; my $rss = {};
if ($rss_serial) { if ($rss_serial) {
@ -483,6 +483,7 @@ sub view {
my $maxHeadlines = $self->get('maxHeadlines') || 1000000; my $maxHeadlines = $self->get('maxHeadlines') || 1000000;
my @urls = split(/\s+/,$self->get('rssUrl')); my @urls = split(/\s+/,$self->get('rssUrl'));
return $self->processTemplate({},$self->get('templateId')) unless (scalar(@urls));
my $title=$self->get('title'); my $title=$self->get('title');
#We came into this subroutine as #We came into this subroutine as
@ -506,7 +507,6 @@ sub view {
#Construct the title for the link. #Construct the title for the link.
_constructRSSHeadTitleLink(\%var,$title || $var{'channel.title'}); _constructRSSHeadTitleLink(\%var,$title || $var{'channel.title'});
if ($rssObject) { if ($rssObject) {
$self->_constructRSS($rssObject,\%var); $self->_constructRSS($rssObject,\%var);
my $rss=$rssObject->as_string; my $rss=$rssObject->as_string;