--- loncom/interface/lonrss.pm 2006/05/11 17:38:44 1.21 +++ loncom/interface/lonrss.pm 2006/05/18 22:30:11 1.23 @@ -1,7 +1,7 @@ # The LearningOnline Network # RSS Feeder # -# $Id: lonrss.pm,v 1.21 2006/05/11 17:38:44 www Exp $ +# $Id: lonrss.pm,v 1.23 2006/05/18 22:30:11 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -29,6 +29,7 @@ package Apache::lonrss; use strict; +use LONCAPA; use Apache::Constants qw(:common); use Apache::loncommon; use Apache::lonnet; @@ -92,7 +93,8 @@ sub advertisefeeds { $mode='adm'; } foreach my $feed (sort(keys(%feednames))) { - if (($feed!~/^error\:/) && ($feed!~/^feed\_display\_option\_/)) { + if ($feed ne '' + && ($feed!~/^error\:/) && ($feed!~/^feed\_display\_option\_/)) { my $feedurl='http://'.$ENV{'HTTP_HOST'}.'/public/'.$udom.'/'.$uname.'/'.$feed.'.rss'; my $htmlurl='http://'.$ENV{'HTTP_HOST'}.'/'.$mode.'/'.$udom.'/'.$uname.'/'.$feed.'_rss.html'; if ($feednames{'feed_display_option_'.$feed} eq 'hidden') { @@ -197,13 +199,13 @@ sub course_blog_link { sub add_blog_entry_link { my ($id,$uname,$udom,$filename,$title,$description,$url,$status,$encurl,$enctype,$linktext)=@_; return "".$linktext.''; }