--- loncom/homework/caparesponse/caparesponse.pm 2003/05/13 15:27:45 1.98 +++ loncom/homework/caparesponse/caparesponse.pm 2003/05/13 15:47:45 1.99 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # caparesponse definition # -# $Id: caparesponse.pm,v 1.98 2003/05/13 15:27:45 sakharuk Exp $ +# $Id: caparesponse.pm,v 1.99 2003/05/13 15:47:45 sakharuk Exp $ # # Copyright Michigan State University Board of Trustees # @@ -319,7 +319,7 @@ sub end_numericalresponse { if ($target eq 'answer') { if ($high) { $ans.=' ['.$low.','.$high.']'; } if ($sighigh) { - if ($ENV{'form.print_answer'} eq 'yes') { + if (($ENV{'form.print_answer'} eq 'yes') && ($ENV{'form.grade_target'} eq 'answer')) { $ans.= " Sig \\textit{$siglow - $sighigh}"; } else { $ans.= " Sig $siglow - $sighigh"; @@ -336,7 +336,7 @@ sub end_numericalresponse { } if ($unit) { if ($target eq 'answer') { - if ($ENV{'form.print_answer'} eq 'yes') { + if (($ENV{'form.print_answer'} eq 'yes') && ($ENV{'form.grade_target'} eq 'answer')) { $result.=&Apache::response::answer_part($$tagstack[-1], "Unit: \\verb|$unit|"); } else {