version 1.49, 2009/11/04 15:38:27
|
version 1.51, 2013/05/06 16:15:59
|
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 288 sub handler {
|
Line 301 sub handler {
|
$edit=1; |
$edit=1; |
$html=1; |
$html=1; |
} |
} |
if (($mode eq 'adm') && (&Apache::lonnet::allowed('mdc',$env{'request.course.id'}))) { |
if (($mode eq 'adm') && (&Apache::lonnet::allowed('mdc',$env{'request.course.id'})) |
|
&& ($uname eq $env{'course.'.$env{'request.course.id'}.'.num'} && |
|
$udom eq $env{'course.'.$env{'request.course.id'}.'.domain'})) { |
$edit=1; |
$edit=1; |
$html=1; |
$html=1; |
} |
} |