--- loncom/interface/lonrss.pm	2006/03/15 21:43:20	1.8
+++ loncom/interface/lonrss.pm	2006/03/21 21:25:33	1.12
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # RSS Feeder
 #
-# $Id: lonrss.pm,v 1.8 2006/03/15 21:43:20 albertel Exp $
+# $Id: lonrss.pm,v 1.12 2006/03/21 21:25:33 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -74,7 +74,6 @@ sub renamefeed {
 }
 
 sub advertisefeeds {
-    return;
     my ($uname,$udom,$edit)=@_;
     my $feeds='';
     my %feednames=&Apache::lonnet::dump('nohist_all_rss_feeds',$udom,$uname);
@@ -98,6 +97,12 @@ sub advertisefeeds {
     }
 }
 
+sub rss_link {
+    my ($url) = @_;
+    return qq|<link rel="alternate" type="application/rss+xml" title="Course Announcements" href="$url" />|;
+
+}
+
 {
     my $feedcounter;
     sub addentry {
@@ -140,14 +145,13 @@ sub changestatus {
 }
 
 sub changed_js {
-
     return <<ENDSCRIPT;
 <script type="text/javascript">
     function changed(tform,id) {
         tform.elements[id+"_modified"].checked=true;
     }
 </script>
-ENDSCRIPT    
+ENDSCRIPT
 }
 
 sub handler {