loncom/homework/lonhomework.pm - diff

Return to lonhomework.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.317, 2010/01/30 22:40:37	version 1.317.4.2, 2010/11/09 17:45:09
Line 111 sub get_target {	Line 111 sub get_target {
} elsif ( $env{'form.grade_target'} eq 'webgrade'	} elsif ( $env{'form.grade_target'} eq 'webgrade'
&& ($Apache::lonhomework::queuegrade eq 'F' )) {	&& ($Apache::lonhomework::queuegrade eq 'F' )) {
return ($env{'form.grade_target'});	return ($env{'form.grade_target'});
}	} elsif ($env{'form.grade_target'} eq 'answer') {
	if ($env{'form.answer_output_mode'} eq 'tex') {
	return ($env{'form.grade_target'});
	}
	}
if ($env{'form.webgrade'} &&	if ($env{'form.webgrade'} &&
($Apache::lonhomework::modifygrades eq 'F'	($Apache::lonhomework::modifygrades eq 'F'
\|\| $Apache::lonhomework::queuegrade eq 'F' )) {	\|\| $Apache::lonhomework::queuegrade eq 'F' )) {
Line 265 sub check_slot_access {	Line 269 sub check_slot_access {
}	}
if ($slotstatus eq 'NEEDS_CHECKIN' &&	if ($slotstatus eq 'NEEDS_CHECKIN' &&
&proctor_checked_in($slot_name,$returned_slot,$type)) {	&proctor_checked_in($slot_name,$returned_slot,$type)) {
&Apache::lonxml::debug("protoctor checked in");	&Apache::lonxml::debug("proctor checked in");
$slotstatus='CAN_ANSWER';	$slotstatus=$status;
}	}

my ($is_correct,$got_grade,$checkedin);	my ($is_correct,$got_grade,$checkedin);