loncom/interface/spreadsheet/lonspreadsheet.pm - diff

Return to lonspreadsheet.pm CVS log

Up to [LON-CAPA] / loncom / interface / spreadsheet

version 1.29, 2003/11/11 20:27:15	version 1.30, 2003/11/21 18:18:04
Line 227 sub handler {	Line 227 sub handler {
}	}
my $courseid = $ENV{'request.course.id'};	my $courseid = $ENV{'request.course.id'};
#	#
# Do not allow students to continue if standard grading is in effect.	# Do not allow students to continue if standard or external grading is in
	# effect.
	#
if ($ENV{'request.role'} =~ /^st\./) {	if ($ENV{'request.role'} =~ /^st\./) {
if ($ENV{'course.'.$courseid.'.grading'} eq 'standard') {	if ($ENV{'course.'.$courseid.'.grading'} eq 'standard' \|\|
	$ENV{'course.'.$courseid.'.grading'} eq 'external' ) {
return HTTP_NOT_ACCEPTABLE;	return HTTP_NOT_ACCEPTABLE;
}	}
}	}