loncom/homework/lonhomework.pm - diff

Return to lonhomework.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.122, 2003/05/09 17:01:08	version 1.123, 2003/05/09 22:24:05
Line 214 sub check_access {	Line 214 sub check_access {
if ( $tries eq '' ) { $tries = '0'; }	if ( $tries eq '' ) { $tries = '0'; }
if ( $maxtries eq '' ) { $maxtries = '2'; }	if ( $maxtries eq '' ) { $maxtries = '2'; }
if ($tries >= $maxtries) { $status = 'CANNOT_ANSWER'; }	if ($tries >= $maxtries) { $status = 'CANNOT_ANSWER'; }
if($Apache::lonhomework::history{"resource.$id.solved"}=~/^correct/) {	if($Apache::lonhomework::history{"resource.$id.solved"}=~/^correct/
	&& lc($Apache::lonhomework::problemstatus) ne 'no') {
$status = 'CANNOT_ANSWER';	$status = 'CANNOT_ANSWER';
}	}
}	}