version 1.28, 2001/01/24 14:27:29
|
version 1.29, 2001/03/21 18:25:14
|
Line 74 sub end_numericalresponse {
|
Line 74 sub end_numericalresponse {
|
$Apache::lonhomework::results{"resource.$Apache::inputtags::part.$id.submission"}=$response; |
$Apache::lonhomework::results{"resource.$Apache::inputtags::part.$id.submission"}=$response; |
&Apache::lonxml::debug("submitted a $response<br>\n"); |
&Apache::lonxml::debug("submitted a $response<br>\n"); |
&Apache::lonxml::debug($$parstack[$#$parstack] . "\n<br>"); |
&Apache::lonxml::debug($$parstack[$#$parstack] . "\n<br>"); |
|
$response =~ s/\\/\\\\/g; |
|
$response =~ s/\'/\\\'/g; |
|
&Apache::lonxml::debug("current $response"); |
my $expression="&caparesponse_check_list('".$response."','". |
my $expression="&caparesponse_check_list('".$response."','". |
$$parstack[$#$parstack]. |
$$parstack[$#$parstack]. |
';my $tol="'.$Apache::inputtags::params{'tol'}.'"'. |
';my $tol="'.$Apache::inputtags::params{'tol'}.'"'. |