fixed some syndicated content bugs

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

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
- fix [ 1279861 ] POD errors in 6.7.3
- fix [ 1287994 ] POD errors in 6.7.4

View file

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