version 1.415, 2013/05/26 12:39:23
|
version 1.417, 2013/07/03 16:44:20
|
Line 329 sub secondary_menu {
|
Line 329 sub secondary_menu {
|
my $canmgr = &Apache::lonnet::allowed('mgr', $crs_sec); |
my $canmgr = &Apache::lonnet::allowed('mgr', $crs_sec); |
my $author = &getauthor(); |
my $author = &getauthor(); |
|
|
my ($cdom,$cnum,$showsyllabus,$showfeeds); |
my ($cdom,$cnum,$showsyllabus,$showfeeds,$showresv); |
if ($env{'request.course.id'}) { |
if ($env{'request.course.id'}) { |
$cdom = $env{'course.'.$env{'request.course.id'}.'.domain'}; |
$cdom = $env{'course.'.$env{'request.course.id'}.'.domain'}; |
$cnum = $env{'course.'.$env{'request.course.id'}.'.num'}; |
$cnum = $env{'course.'.$env{'request.course.id'}.'.num'}; |
Line 349 sub secondary_menu {
|
Line 349 sub secondary_menu {
|
$showfeeds = 1; |
$showfeeds = 1; |
} |
} |
} |
} |
|
unless ($canmgr) { |
|
my %slots = &Apache::lonnet::get_course_slots($cnum,$cdom); |
|
if (keys(%slots) > 0) { |
|
$showresv = 1; |
|
} |
|
} |
} |
} |
|
|
my ($canmodifycoauthor); |
my ($canmodifycoauthor); |
Line 385 sub secondary_menu {
|
Line 391 sub secondary_menu {
|
&& ($canmodifyuser || !$canviewroster); |
&& ($canmodifyuser || !$canviewroster); |
next if $$menuitem[4] eq 'mgr' |
next if $$menuitem[4] eq 'mgr' |
&& !$canmgr; |
&& !$canmgr; |
next if $$menuitem[4] eq 'nmgr' |
next if $$menuitem[4] eq 'showresv' |
&& $canmgr; |
&& !$showresv; |
next if $$menuitem[4] eq 'whn' |
next if $$menuitem[4] eq 'whn' |
&& !$canviewwnew; |
&& !$canviewwnew; |
next if $$menuitem[4] eq 'opa' |
next if $$menuitem[4] eq 'opa' |
Line 487 sub create_submenu {
|
Line 493 sub create_submenu {
|
foreach my $item (@{$submenu}) { |
foreach my $item (@{$submenu}) { |
$count ++; |
$count ++; |
if (ref($item) eq 'ARRAY') { |
if (ref($item) eq 'ARRAY') { |
|
my $href = $item->[0]; |
|
if ($href =~ /(aboutme|rss\.html)$/) { |
|
next unless (($env{'user.name'} ne '') && ($env{'user.domain'} ne '')); |
|
$href =~ s/\[domain\]/$env{'user.domain'}/g; |
|
$href =~ s/\[user\]/$env{'user.name'}/g; |
|
} |
my $borderbot; |
my $borderbot; |
if ($count == $numsub) { |
if ($count == $numsub) { |
$borderbot = 'border-bottom:1px solid black;'; |
$borderbot = 'border-bottom:1px solid black;'; |
} |
} |
if ($item->[0] =~ /(aboutme|rss\.html)$/) { |
|
$item->[0] =~ s/\[domain\]/$env{'user.domain'}/g; |
|
$item->[0] =~ s/\[user\]/$env{'user.name'}/g; |
|
} |
|
$menu .= '<li style="margin:0;padding:0;'. |
$menu .= '<li style="margin:0;padding:0;'. |
$borderbot.'"><a href="'.$item->[0].'">'. |
$borderbot.'"><a href="'.$href.'">'. |
&mt($item->[1]).'</a></li>'; |
&mt($item->[1]).'</a></li>'; |
} |
} |
} |
} |