loncom/interface/lonmenu.pm - diff

Return to lonmenu.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.362, 2011/11/27 20:55:58	version 1.364, 2011/11/30 18:30:32
Line 428 sub innerregister {	Line 428 sub innerregister {
"gocmd('/adm/parmset','set')",	"gocmd('/adm/parmset','set')",
'Content Settings');	'Content Settings');
}	}
if ($env{'request.symb'} ne '' &&	if ($env{'request.symb'}=~/^uploaded/ &&
&Apache::lonnet::allowed('mdc',$crs)) {	&Apache::lonnet::allowed('mdc',$crs)) {
$hwkadd.=&switch('','',7,4,'docs.png','Folder/Page Content','parms[_2]',	$hwkadd.=&switch('','',7,4,'docs.png','Folder/Page Content','parms[_2]',
"gocmd('/adm/coursedocs','direct')",	"gocmd('/adm/coursedocs','direct')",
Line 1670 sub required_privs {	Line 1670 sub required_privs {
'/adm/statistics' => 'vgr',	'/adm/statistics' => 'vgr',
};	};
unless ($env{'course.'.$env{'request.course.id'}.'.grading'} eq 'spreadsheet') {	unless ($env{'course.'.$env{'request.course.id'}.'.grading'} eq 'spreadsheet') {
$privs->{'/adm/classcalc'} => 'vgr',	$privs->{'/adm/classcalc'} = 'vgr',
$privs->{'/adm/assesscalc'} => 'vgr',	$privs->{'/adm/assesscalc'} = 'vgr',
$privs->{'/adm/studentcalc'} => 'vgr';	$privs->{'/adm/studentcalc'} = 'vgr';
}	}
return $privs;	return $privs;
}	}