version 1.184, 2005/12/06 10:01:57
|
version 1.185, 2005/12/06 10:16:56
|
Line 422 sub end_numericalresponse {
|
Line 422 sub end_numericalresponse {
|
|
|
if ($target eq 'answer') { |
if ($target eq 'answer') { |
$result.=&Apache::response::answer_header($tag); |
$result.=&Apache::response::answer_header($tag); |
if ($Apache::lonhomework::type eq 'exam') { |
if ($tag eq 'numericalresponse' |
|
&& $Apache::lonhomework::type eq 'exam') { |
my ($bubble_values,undef,$correct) = &make_numerical_bubbles($partid, |
my ($bubble_values,undef,$correct) = &make_numerical_bubbles($partid, |
$id,$target,$parstack,$safeeval); |
$id,$target,$parstack,$safeeval); |
$result.=&Apache::response::answer_part($tag,$correct); |
$result.=&Apache::response::answer_part($tag,$correct); |