[SimBot-commits] CVS: simbot/plugins rss.pl,1.68,1.69

[Pete P. <fou...@us...>]

Update of /cvsroot/simbot/simbot/plugins
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv31638/plugins

Modified Files:
	rss.pl 
Log Message:
Remove feedburner redirects. This should fix the random re-announcing every
entry in the feed. As an added bonus, users won't have to wait on a slow
redirect.


Index: rss.pl
===================================================================
RCS file: /cvsroot/simbot/simbot/plugins/rss.pl,v
retrieving revision 1.68
retrieving revision 1.69
diff -u -d -p -r1.68 -r1.69
--- rss.pl	7 May 2005 03:03:06 -0000	1.68
+++ rss.pl	14 Oct 2005 01:56:20 -0000	1.69
@@ -297,6 +297,10 @@ sub got_response {
         $last_update = time;
     } elsif($response->is_success) {
         $last_update = time;
+        $rss->add_module(
+            prefix  => 'feedburner',
+            uri     => 'http://rssnamespace.org/feedburner/ext/1.0',
+        );
         if (!eval { $rss->parse($response->decoded_content); }) {
 			&SimBot::debug(1, "rss:  Parse error in $key: $@");
 			return;
@@ -477,6 +481,10 @@ sub get_link_and_title {
     my $item = $_[0];
     my $link = $item->{'link'};
     my $title = $item->{'title'};
+        
+    if(defined $item->{'feedburner'}->{'origLink'}) {
+        $link = $item->{'feedburner'}->{'origLink'};
+    }
 
     $title = ($item->{'title'} ? $item->{'title'} : "");
     $title = HTML::Entities::decode($title);