--- loncom/homework/caparesponse/caparesponse.pm 2002/11/13 23:37:56 1.72 +++ loncom/homework/caparesponse/caparesponse.pm 2002/11/25 21:36:42 1.73 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # caparesponse definition # -# $Id: caparesponse.pm,v 1.72 2002/11/13 23:37:56 albertel Exp $ +# $Id: caparesponse.pm,v 1.73 2002/11/25 21:36:42 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -113,6 +113,8 @@ sub start_numericalresponse { } } elsif ($target eq 'meta') { $result=&Apache::response::meta_package_write('numericalresponse'); + } elsif ($target eq 'answer' || $target eq 'grade') { + &Apache::response::reset_params(); } return $result; } @@ -358,8 +360,8 @@ sub end_numericalresponse { } } if ($target eq 'answer') { - if ($high) { $ans.=' ['.$low.','.$high.'] '; } - if ($sighigh) { $ans.= "Sig $siglow - $sighigh"; } + if ($high) { $ans.=' ['.$low.','.$high.']'; } + if ($sighigh) { $ans.= " Sig $siglow - $sighigh"; } $result.=&Apache::response::answer_part($$tagstack[-1],$ans); } elsif ($target eq 'analyze') { push (@{ $Apache::lonhomework::analyze{"$part_id.answer"} },