loncom/interface/spreadsheet/Spreadsheet.pm - diff

Return to Spreadsheet.pm CVS log

Up to [LON-CAPA] / loncom / interface / spreadsheet

version 1.62, 2006/02/27 00:56:47	version 1.65, 2006/03/05 21:38:27
Line 808 sub expandnamed {	Line 808 sub expandnamed {
$result.=$thissum.'+';	$result.=$thissum.'+';
}	}
$result=~s/\+$//;	$result=~s/\+$//;
return $result;	return '('.$result.')';
} else {	} else {
return 0;	return 0;
}	}
Line 1290 sub html_editable_cell {	Line 1290 sub html_editable_cell {
}	}
$name = '' if (! defined($name));	$name = '' if (! defined($name));
$formula = '' if (! defined($formula));	$formula = '' if (! defined($formula));
if ($showsource)	if ($showsource) {
{
if (!defined($formula) \|\| $formula =~ /^\s*$/) {	if (!defined($formula) \|\| $formula =~ /^\s*$/) {
$value = '<font color="'.$bgcolor.'">#</font>';	$value = '<font color="'.$bgcolor.'">#</font>';
} else {	} else {
$value = &HTML::Entities::encode($formula, '<>&"');	$value = &HTML::Entities::encode($formula, '<>&"');
}	}
}	} elsif (! defined($value)) {
elsif (! defined($value)) {
$value = '<font color="'.$bgcolor.'">#</font>';	$value = '<font color="'.$bgcolor.'">#</font>';
if ($formula ne '') {	if ($formula ne '') {
$value = '<i>undefined value</i>';	$value = '<i>undefined value</i>';