|
version 1.98, 2003/05/13 15:27:45
|
version 1.99, 2003/05/13 15:47:45
|
|
Line 319 sub end_numericalresponse {
|
Line 319 sub end_numericalresponse {
|
| if ($target eq 'answer') { |
if ($target eq 'answer') { |
| if ($high) { $ans.=' ['.$low.','.$high.']'; } |
if ($high) { $ans.=' ['.$low.','.$high.']'; } |
| if ($sighigh) { |
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}"; |
$ans.= " Sig \\textit{$siglow - $sighigh}"; |
| } else { |
} else { |
| $ans.= " Sig <i>$siglow - $sighigh</i>"; |
$ans.= " Sig <i>$siglow - $sighigh</i>"; |
|
Line 336 sub end_numericalresponse {
|
Line 336 sub end_numericalresponse {
|
| } |
} |
| if ($unit) { |
if ($unit) { |
| if ($target eq 'answer') { |
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], |
$result.=&Apache::response::answer_part($$tagstack[-1], |
| "Unit: \\verb|$unit|"); |
"Unit: \\verb|$unit|"); |
| } else { |
} else { |
![[BACK]](/icons/back.gif){kind=icon}
Return to caparesponse.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / homework / caparesponse