loncom/homework/caparesponse/caparesponse.pm - diff

Return to caparesponse.pm CVS log

Up to [LON-CAPA] / loncom / homework / caparesponse

version 1.176, 2005/07/14 05:50:33	version 1.177, 2005/08/02 19:01:18
Line 389 sub end_numericalresponse {	Line 389 sub end_numericalresponse {
if ($unit=~/\$/) { $fmt="\$".$fmt; $unit=~s/\$//g; }	if ($unit=~/\$/) { $fmt="\$".$fmt; $unit=~s/\$//g; }
if ($unit=~/\,/) { $fmt="\,".$fmt; $unit=~s/\,//g; }	if ($unit=~/\,/) { $fmt="\,".$fmt; $unit=~s/\,//g; }
$ans = &format_number($ans,$fmt,$target,$safeeval);	$ans = &format_number($ans,$fmt,$target,$safeeval);
	if ($fmt=~/\$/ && $unit!~/\$/) { $ans=~s/\$//; }
}	}
push(@fmt_ans,$ans);	push(@fmt_ans,$ans);
}	}