version 1.50, 2012/07/03 15:18:54
|
version 1.52, 2013/05/25 21:50:19
|
Line 88 sub changefeeddisplay {
|
Line 88 sub changefeeddisplay {
|
} |
} |
|
|
sub advertisefeeds { |
sub advertisefeeds { |
my ($uname,$udom,$edit)=@_; |
my ($uname,$udom,$edit,$count,$hidden)=@_; |
my $feeds=''; |
my $feeds=''; |
my %feednames=&Apache::lonnet::dump('nohist_all_rss_feeds',$udom,$uname); |
my %feednames=&Apache::lonnet::dump('nohist_all_rss_feeds',$udom,$uname); |
my $mode='public'; |
my $mode='public'; |
Line 100 sub advertisefeeds {
|
Line 100 sub advertisefeeds {
|
next if ($feed =~/^\s*$/ || |
next if ($feed =~/^\s*$/ || |
$feed =~ /^error:/ || |
$feed =~ /^error:/ || |
$feed =~ /^feed_display_option_/); |
$feed =~ /^feed_display_option_/); |
|
if ($feednames{'feed_display_option_'.$feed} eq 'hidden') { |
|
if (ref($hidden)) { |
|
$$hidden ++; |
|
} |
|
if (ref($count)) { |
|
unless ($edit) { |
|
next; |
|
} |
|
} |
|
} else { |
|
if (ref($count)) { |
|
$$count ++; |
|
} |
|
} |
my $feedurl= $server.'/public/'.$udom.'/'.$uname.'/'.$feed.'.rss'; |
my $feedurl= $server.'/public/'.$udom.'/'.$uname.'/'.$feed.'.rss'; |
my $htmlurl= $server.'/'.$mode.'/'.$udom.'/'.$uname.'/'.$feed.'_rss.html'; |
my $htmlurl= $server.'/'.$mode.'/'.$udom.'/'.$uname.'/'.$feed.'_rss.html'; |
if ($feednames{'feed_display_option_'.$feed} eq 'hidden') { |
if ($feednames{'feed_display_option_'.$feed} eq 'hidden') { |
Line 398 sub handler {
|
Line 411 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('<h4>' . &mt('New RSS Feed or Blog'). '</h4>'); |
$r->print('<form method="post" name="makenewfeed">'); |
$r->print('<form method="post" name="makenewfeed" action="">'); |
$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').'" />'); |
$r->print('</form>'); |
$r->print('</form>'); |
Line 500 sub handler {
|
Line 513 sub handler {
|
($html?'<hr /><h3>':'<title>'). |
($html?'<hr /><h3>':'<title>'). |
&mt('LON-CAPA Feed "[_1]" for [_2]',$displayfeedname,$name). |
&mt('LON-CAPA Feed "[_1]" for [_2]',$displayfeedname,$name). |
($displayoption eq 'hidden'?' ('.&mt('Hidden').')':''). |
($displayoption eq 'hidden'?' ('.&mt('Hidden').')':''). |
($html?'</h3>'.($edit?'<form method="post" name="lonhomework" enctype="multipart/form-data"><br />'. |
($html?'</h3>'.($edit?'<form method="post" name="lonhomework" enctype="multipart/form-data" action=""><br />'. |
&mt('Name of this Feed'). |
&mt('Name of this Feed'). |
': <input type="text" size="50" name="newblogname" value="'. |
': <input type="text" size="50" name="newblogname" value="'. |
$displayfeedname.'" />':'').'<ul>':'</title>')); |
$displayfeedname.'" />':'').'<ul>':'</title>')); |
Line 601 ENDEDIT
|
Line 614 ENDEDIT
|
($displayoption eq 'hidden'?'<input type="submit" name="advertisethisblog" value="'.&mt('Advertise this Feed').'" />': |
($displayoption eq 'hidden'?'<input type="submit" name="advertisethisblog" value="'.&mt('Advertise this Feed').'" />': |
'<input type="submit" name="hidethisblog" value="'.&mt('Hide this Feed').'" />')); |
'<input type="submit" name="hidethisblog" value="'.&mt('Hide this Feed').'" />')); |
} |
} |
|
$r->print('</form>'); |
} |
} |
} # was a real display feedname |
} # was a real display feedname |
$r->print(($html?'</form>'.&Apache::loncommon::end_page():'</channel></rss>'."\n")); |
$r->print(($html?&Apache::loncommon::end_page():'</channel></rss>'."\n")); |
} # a real user |
} # a real user |
return OK; |
return OK; |
} # end handler |
} # end handler |