loncom/homework/caparesponse/caparesponse.pm - diff

Return to caparesponse.pm CVS log

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

version 1.136, 2004/02/26 21:13:54	version 1.137, 2004/02/26 21:25:28
Line 461 sub make_numerical_bubbles {	Line 461 sub make_numerical_bubbles {
&Apache::lonxml::debug("Answer was :$answer: returning :".$#bubble_values.": whih are :".join(':',@bubble_values));	&Apache::lonxml::debug("Answer was :$answer: returning :".$#bubble_values.": whih are :".join(':',@bubble_values));
&Math::Random::random_set_seed(@oldseed);	&Math::Random::random_set_seed(@oldseed);
if (defined($format) && $format ne '') {	if (defined($format) && $format ne '') {
for(my $i=0;$i<=$#bubble_values;$i++) {	foreach my $value (@bubble_values) {
$bubble_values[$i]=&format_number($bubble_values[$i],$format,$target);	$value=&format_number($value,$format,$target);
}	}
}	}
return @bubble_values;	return @bubble_values;