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'; |
} |
} |
} |
} |