loncom/interface/lonblockingmenu.pm - diff

Return to lonblockingmenu.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.2, 2011/12/28 22:09:44	version 1.3, 2011/12/28 22:41:02
Line 98 sub handler {	Line 98 sub handler {

# ----------------------------------------------------------- Permissions check	# ----------------------------------------------------------- Permissions check

unless ((!&Apache::lonnet::allowed('dcm',$env{'request.course.id'})) \|\|	unless ((&Apache::lonnet::allowed('dcm',$env{'request.course.id'})) \|\|
(!&Apache::lonnet::allowed('dcm',$env{'request.course.id'}.	(&Apache::lonnet::allowed('dcm',$env{'request.course.id'}.
'/'.$env{'request.course.sec'}))) {	'/'.$env{'request.course.sec'}))) {
	$env{'user.error.msg'}=
	"/adm/setblock:dcm:0:0:Cannot set blocking of communications in a course";
return HTTP_NOT_ACCEPTABLE;	return HTTP_NOT_ACCEPTABLE;
}	}