loncom/homework/caparesponse/caparesponse.pm - diff

Return to caparesponse.pm CVS log

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

version 1.257, 2016/02/18 18:40:05	version 1.258, 2016/08/09 23:43:45
Line 894 sub get_table_sizes {	Line 894 sub get_table_sizes {
my $cell_width=0;	my $cell_width=0;
foreach my $member (@$rbubble_values) {	foreach my $member (@$rbubble_values) {
my $cell_width_real=0;	my $cell_width_real=0;
if ($member=~/(\+\|-)?(\d)\.?(\d)\s\$?\\times\s10\^{(\+\|-)?(\d+)}\$?/) {	if ($member=~/(\+\|-)?(\d)\.?(\d)\s\$?\\times\s10\^\{(\+\|-)?(\d+)}\$?/) {
$cell_width_real=(length($2)+length($3)+length($5)+7)*$scale;	$cell_width_real=(length($2)+length($3)+length($5)+7)*$scale;
} elsif ($member=~/(\d)\.?(\d)(E\|e)(\+\|-)?(\d*)/) {	} elsif ($member=~/(\d)\.?(\d)(E\|e)(\+\|-)?(\d*)/) {
$cell_width_real=(length($1)+length($2)+length($5)+9)*$scale;	$cell_width_real=(length($1)+length($2)+length($5)+9)*$scale;