--- loncom/interface/lonrss.pm 2006/05/11 17:38:44 1.21 +++ loncom/interface/lonrss.pm 2006/06/02 10:02:37 1.24 @@ -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.24 2006/06/02 10:02:37 www 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; @@ -138,7 +139,8 @@ sub editentry { } my $feedname=&feedname($filename); &Apache::lonnet::put('nohist_all_rss_feeds', - { &filterfeedname($filename) => &displayfeedname($filename,$uname,$udom) }, + { &filterfeedname($filename) => + (&displayfeedname($filename,$uname,$udom))[0] }, $udom,$uname); return &Apache::lonnet::put($feedname,{ $id.'_title' => $title, @@ -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.''; }