From e66c2794c0269b2d51ac7cabf1d308f9913a1b93 Mon Sep 17 00:00:00 2001 From: Len Kranendonk Date: Tue, 20 May 2003 11:43:46 +0000 Subject: [PATCH] fixed Syndicated Content parse bug --- lib/WebGUI/Wobject/SyndicatedContent.pm | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/lib/WebGUI/Wobject/SyndicatedContent.pm b/lib/WebGUI/Wobject/SyndicatedContent.pm index 310f1eaa8..a64ca8380 100644 --- a/lib/WebGUI/Wobject/SyndicatedContent.pm +++ b/lib/WebGUI/Wobject/SyndicatedContent.pm @@ -83,11 +83,13 @@ sub www_view { WebGUI::ErrorHandler::warn($_[0]->get("rssUrl")." ".$@); } my %var; - $var{"channel.title"} = $rss{title} || $rss{channel}{title}; - $var{"channel.link"} = $rss{link} || $rss{channel}{link}; - $var{"channel.description"} = $rss{description} || $rss{channel}{description}; + $var{"channel.title"} = $rss{title} || $rss{channel}{title} || $rss{RDF}{channel}{title}; + $var{"channel.link"} = $rss{link} || $rss{channel}{link} || $rss{RDF}{channel}{link}; + $var{"channel.description"} = $rss{description} || $rss{channel}{description} || $rss{RDF}{channel}{description}; my @items; - foreach my $item (@{$rss{item}}) { + my $rssItem = \$rss{item}; + $rssItem = \$rss{RDF}{item} unless ($rss{item}); + foreach my $item (@{$$rssItem}) { push (@items,{ link=>$item->{link}, title=>$item->{title},