loncom/homework/lonhomework.pm - diff

Return to lonhomework.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.126, 2003/05/13 01:56:32	version 1.127, 2003/05/14 17:16:20
Line 286 sub showhashsubset {	Line 286 sub showhashsubset {

sub setuppermissions {	sub setuppermissions {
$Apache::lonhomework::browse= &Apache::lonnet::allowed('bre',$ENV{'request.filename'});	$Apache::lonhomework::browse= &Apache::lonnet::allowed('bre',$ENV{'request.filename'});
$Apache::lonhomework::viewgrades=&Apache::lonnet::allowed('vgr',$ENV{'request.course.id'});	my $viewgrades = &Apache::lonnet::allowed('vgr',$ENV{'request.course.id'});
	if (! $viewgrades &&
	exists($ENV{'request.course.sec'}) &&
	$ENV{'request.course.sec'} !~ /^\s*$/) {
	$viewgrades = &Apache::lonnet::allowed('vgr',$ENV{'request.course.id'}.
	'/'.$ENV{'request.course.sec'});
	}
	$Apache::lonhomework::viewgrades = $viewgrades;
return ''	return ''
}	}