|
version 1.178, 2007/09/27 19:05:03
|
version 1.182, 2007/11/05 11:46:08
|
|
Line 451 sub end_customresponse {
|
Line 451 sub end_customresponse {
|
| } |
} |
| if ($target eq 'grade' || $target eq 'web' || $target eq 'answer' || |
if ($target eq 'grade' || $target eq 'web' || $target eq 'answer' || |
| $target eq 'tex' || $target eq 'analyze') { |
$target eq 'tex' || $target eq 'analyze') { |
| &Apache::lonxml::increment_counter(&Apache::response::repetition()); |
&Apache::lonxml::increment_counter(&Apache::response::repetition(), |
| |
"$part.$id"); |
| |
if ($target eq 'analyze') { |
| |
&Apache::lonhomework::set_bubble_lines(); |
| |
} |
| } |
} |
| pop(@Apache::lonxml::namespace); |
pop(@Apache::lonxml::namespace); |
| pop(@Apache::response::custom_answer); |
pop(@Apache::response::custom_answer); |
|
Line 894 sub getresponse {
|
Line 898 sub getresponse {
|
| $response = $env{'scantron.'. |
$response = $env{'scantron.'. |
| ($Apache::lonxml::counter+$offset-1+$line). |
($Apache::lonxml::counter+$offset-1+$line). |
| '.answer'}; |
'.answer'}; |
| if ($response ne "") { |
if ((defined($response)) && ($response ne " ")) { |
| last; |
last; |
| } |
} |
| |
|
|
Line 1046 sub show_answer {
|
Line 1050 sub show_answer {
|
| my $award = $Apache::lonhomework::history{"resource.$part.solved"}; |
my $award = $Apache::lonhomework::history{"resource.$part.solved"}; |
| my $status = $Apache::inputtags::status[-1]; |
my $status = $Apache::inputtags::status[-1]; |
| return ( ($award =~ /^correct/ |
return ( ($award =~ /^correct/ |
| && lc($Apache::lonhomework::problemstatus) ne 'no') |
&& &Apache::lonhomework::show_problem_status()) |
| || $status eq "SHOW_ANSWER"); |
|| $status eq "SHOW_ANSWER"); |
| } |
} |
| |
|
![[BACK]](/icons/back.gif){kind=icon}
Return to response.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / homework