version 1.85, 2011/11/29 13:24:38
|
version 1.86, 2011/12/15 01:21:28
|
Line 30 package Apache::matchresponse;
|
Line 30 package Apache::matchresponse;
|
use strict; |
use strict; |
use HTML::Entities(); |
use HTML::Entities(); |
use Math::Random(); |
use Math::Random(); |
use Apache::inputtags(); |
|
use Apache::optionresponse(); |
use Apache::optionresponse(); |
use Apache::lonlocal; |
use Apache::lonlocal; |
use Apache::lonnet; |
use Apache::lonnet; |
Line 463 sub grade_response {
|
Line 462 sub grade_response {
|
} |
} |
} |
} |
my $part=$Apache::inputtags::part; |
my $part=$Apache::inputtags::part; |
my $nonlenient=&Apache::inputtags::grading_is_nonlenient($part); |
my $nonlenient=&Apache::optionresponse::grading_is_nonlenient($part); |
my $id = $Apache::inputtags::response['-1']; |
my $id = $Apache::inputtags::response['-1']; |
my $responsestr=&Apache::lonnet::hash2str(%responsehash); |
my $responsestr=&Apache::lonnet::hash2str(%responsehash); |
my $itemstr =&Apache::lonnet::array2str(@items); |
my $itemstr =&Apache::lonnet::array2str(@items); |