|
version 1.557, 2024/10/14 02:13:26
|
version 1.558, 2024/11/22 22:43:54
|
|
Line 2696 sub utilityfunctions {
|
Line 2696 sub utilityfunctions {
|
| ($env{'request.symb'} ne '') && |
($env{'request.symb'} ne '') && |
| ($env{'request.filename'}=~/$LONCAPA::assess_re/)) { |
($env{'request.filename'}=~/$LONCAPA::assess_re/)) { |
| my $canview; |
my $canview; |
| foreach my $priv ('msg','vgr') { |
foreach my $priv ('mgr','vgr') { |
| $canview = &Apache::lonnet::allowed($priv,$env{'request.course.id'}); |
$canview = &Apache::lonnet::allowed($priv,$env{'request.course.id'}); |
| if (!$canview && $env{'request.course.sec'} ne '') { |
if (!$canview && $env{'request.course.sec'} ne '') { |
| $canview = |
$canview = |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonmenu.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface