version 1.229, 2011/11/29 17:43:30
|
version 1.230, 2011/12/15 01:21:28
|
Line 1189 sub show_answer {
|
Line 1189 sub show_answer {
|
my $status = $Apache::inputtags::status[-1]; |
my $status = $Apache::inputtags::status[-1]; |
my $canshow = 0; |
my $canshow = 0; |
if ($award =~ /^correct/) { |
if ($award =~ /^correct/) { |
if ((&Apache::inputtags::grading_is_nonlenient($part)) || |
if (($Apache::lonhomework::history{"resource.$part.awarded"} >= 1) || |
($Apache::lonhomework::history{"resource.$part.awarded"} == 1)) { |
(&Apache::lonnet::EXT("resource.$part.retrypartial") !~/^1|on|yes$/)) { |
$canshow = 1; |
$canshow = 1; |
} |
} |
} |
} |