loncom/interface/lonrss.pm - diff

Return to lonrss.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.40, 2008/12/10 21:46:58	version 1.42, 2008/12/15 16:37:44
Line 323 sub handler {	Line 323 sub handler {
my $title = $displayfeedname?$displayfeedname	my $title = $displayfeedname?$displayfeedname
:"Available RSS Feeds and Blogs";	:"Available RSS Feeds and Blogs";
my $rss_link = &Apache::lonrss::rss_link($uname,$udom);	my $rss_link = &Apache::lonrss::rss_link($uname,$udom);
my @brcrumb = [{href=>$rss_link,text=>"Available RSS Feeds and Blogs"}];	my $brcrumb = [{href=>$rss_link,text=>"Available RSS Feeds and Blogs"}];
$r->print(&Apache::loncommon::start_page($title,$rss_link,	$r->print(&Apache::loncommon::start_page($title,$rss_link,
{'bread_crumbs' => @brcrumb,	{'bread_crumbs' => $brcrumb,
'domain' => $udom,	'domain' => $udom,
'force_register' =>	'force_register' => $env{'form.register'}}).
$env{'form.register'}}).
&changed_js());	&changed_js());
} else { # render RSS	} else { # render RSS
my $server = &Apache::lonnet::absolute_url();	my $server = &Apache::lonnet::absolute_url();
Line 343 sub handler {	Line 342 sub handler {
my $newid = &get_new_feed_id();	my $newid = &get_new_feed_id();
# Is this user for real?	# Is this user for real?
my $homeserver=&Apache::lonnet::homeserver($uname,$udom);	my $homeserver=&Apache::lonnet::homeserver($uname,$udom);
if ($html && !$blocked && !&disabled) {	if ($html && !$blocked && !$disabled) {
# Any new feeds or renaming of feeds?	# Any new feeds or renaming of feeds?
if ($edit) {	if ($edit) {
# Hide a feed?	# Hide a feed?