version 1.323, 2011/02/06 18:43:10
|
version 1.325, 2011/03/07 19:42:21
|
Line 147 sub get_target {
|
Line 147 sub get_target {
|
} else { |
} else { |
if ($env{'form.problemstate'} eq 'WEB_GRADE') { |
if ($env{'form.problemstate'} eq 'WEB_GRADE') { |
return ('grade','webgrade','answer'); |
return ('grade','webgrade','answer'); |
|
} elsif ($env{'form.problemmode'} eq 'view') { |
|
return ('grade','web','answer'); |
} elsif ($env{'form.problemmode'} eq 'saveview') { |
} elsif ($env{'form.problemmode'} eq 'saveview') { |
return ('modified','web','answer'); |
return ('modified','web','answer'); |
} elsif ($env{'form.problemmode'} eq 'discard') { |
} elsif ($env{'form.problemmode'} eq 'discard') { |
Line 436 sub check_access {
|
Line 438 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() |
|
&& |
|
$Apache::lonhomework::history{"resource.$id.awarded"}==1) |
|| |
|| |
$Apache::lonhomework::history{"resource.$id.solved"}=~/^excused/) { |
$Apache::lonhomework::history{"resource.$id.solved"}=~/^excused/) { |
$status = 'CANNOT_ANSWER'; |
$status = 'CANNOT_ANSWER'; |