version 1.332, 2011/12/08 01:34:47
|
version 1.333, 2011/12/15 01:21:28
|
Line 444 sub check_access {
|
Line 444 sub check_access {
|
# 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/) |
&& (&show_problem_status()) ) { |
&& (&show_problem_status()) ) { |
if (&Apache::inputtags::grading_is_nonlenient($id) || |
if (($Apache::lonhomework::history{"resource.$id.awarded"} >= 1) || |
$Apache::lonhomework::history{"resource.$id.awarded"} == 1) { |
(&Apache::lonnet::EXT("resource.$id.retrypartial") !~/^1|on|yes$/i)) { |
$status = 'CANNOT_ANSWER'; |
$status = 'CANNOT_ANSWER'; |
} |
} |
} elsif ($Apache::lonhomework::history{"resource.$id.solved"}=~/^excused/) { |
} elsif ($Apache::lonhomework::history{"resource.$id.solved"}=~/^excused/) { |