loncom/homework/lonhomework.pm - diff

Return to lonhomework.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.348, 2015/01/27 08:40:41	version 1.349, 2015/02/21 21:53:34
Line 469 sub check_access {	Line 469 sub check_access {
if ( $tries eq '' ) { $tries = '0'; }	if ( $tries eq '' ) { $tries = '0'; }
if ( $maxtries eq '' &&	if ( $maxtries eq '' &&
$env{'request.state'} ne 'construct') { $maxtries = '2'; }	$env{'request.state'} ne 'construct') { $maxtries = '2'; }
$Apache::lonhomework::results{'resource.'.$id.'.maxtries'}=$maxtries;
if ($maxtries && $tries >= $maxtries) { $status = 'CANNOT_ANSWER'; }	if ($maxtries && $tries >= $maxtries) { $status = 'CANNOT_ANSWER'; }
# if (correct and show prob status) or excused then CANNOT_ANSWER	# if (correct and show prob status) or excused then CANNOT_ANSWER
if ( ($Apache::lonhomework::history{"resource.$id.solved"}=~/^correct/)	if ( ($Apache::lonhomework::history{"resource.$id.solved"}=~/^correct/)