version 1.55, 2002/08/28 14:22:15
|
version 1.56, 2002/09/04 04:57:13
|
Line 169 sub end_numericalresponse {
|
Line 169 sub end_numericalresponse {
|
if ($target eq 'web') { |
if ($target eq 'web') { |
$result="<br />The computer got "; |
$result="<br />The computer got "; |
} elsif ($target eq 'tex') { |
} elsif ($target eq 'tex') { |
$result='\vskip 0 mm The computer got \verb|'; |
$result='\vskip 0 mm The computer got '; |
} |
} |
for (my $i=0; $i <= $#answers; $i++) { |
for (my $i=0; $i <= $#answers; $i++) { |
my $answer=$answers[$i]; |
my $answer=$answers[$i]; |
Line 189 sub end_numericalresponse {
|
Line 189 sub end_numericalresponse {
|
} |
} |
chop $result; |
chop $result; |
if ($target eq 'web') { |
if ($target eq 'web') { |
$result.=" $unit.<br></br>"; |
$result.=" $unit.<br />"; |
} elsif ($target eq 'tex') { |
} elsif ($target eq 'tex') { |
$result.=" $unit.| \\vskip 0 mm "; |
$result.="$unit. \\vskip 0 mm "; |
|
$result=&Apache::lonxml::latex_special_symbols($result,$tagstack,$parstack); |
} |
} |
} |
} |
} elsif ($target eq 'edit') { |
} elsif ($target eq 'edit') { |