loncom/interface/lonrss.pm - diff

Return to lonrss.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.46, 2009/02/26 16:17:29	version 1.47.8.1, 2010/01/03 21:21:25
Line 60 sub displayfeedname {	Line 60 sub displayfeedname {
# no, construct a name	# no, construct a name
my $name=$filterfilename;	my $name=$filterfilename;
if ($name=~/^CourseBlog/) {	if ($name=~/^CourseBlog/) {
	if ($env{'course.'.$env{'request.course.id'}.'.type'} eq 'Community') {
	$name = &mt('Community Blog');
	}
$name=&mt('Course Blog');	$name=&mt('Course Blog');
if ($env{'course.'.$env{'request.course.id'}.'.description'}) {	if ($env{'course.'.$env{'request.course.id'}.'.description'}) {
$name.=' '.$env{'course.'.$env{'request.course.id'}.'.description'};	$name.=' '.$env{'course.'.$env{'request.course.id'}.'.description'};
Line 390 sub handler {	Line 393 sub handler {
}	}
# Add a new feed	# Add a new feed
if (($html) && ($edit)) {	if (($html) && ($edit)) {
	$r->print('<h4>' . &mt('New RSS Feed or Blog'). '</h4>');
$r->print('<form method="post" name="makenewfeed">');	$r->print('<form method="post" name="makenewfeed">');
$r->print(&mt('Name').": <input type='text' size='40' name='namenewblog' />");	$r->print(&mt('Name').": <input type='text' size='40' name='namenewblog' />");
$r->print('<input type="submit" value="'.&mt('New Feed').'" />');	$r->print('<input type="submit" value="'.&mt('New Feed').'" />');