--- loncom/interface/spreadsheet/assesscalc.pm 2005/05/17 18:01:58 1.48 +++ loncom/interface/spreadsheet/assesscalc.pm 2005/05/17 18:04:40 1.49 @@ -1,5 +1,5 @@ # -# $Id: assesscalc.pm,v 1.48 2005/05/17 18:01:58 albertel Exp $ +# $Id: assesscalc.pm,v 1.49 2005/05/17 18:04:40 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -786,7 +786,7 @@ sub compute { if ($parm =~ /_submission$/ && $value =~ /(\{|\})/) { $value = 'witheld'; } - #$value = 'q{'.$value.'}' if ($value =~/([^\d\.]|\.\.)/); + $value = 'q{'.$value.'}' if ($value =~/([^\d\.]|\.\.)/); $c{$parm} = $value; } $self->formulas(\%f); @@ -837,7 +837,7 @@ sub sett { && $self->{'constants'}->{$formula} ne '' ) { $Apache::Spreadsheet::sheet_values{$cell}= - $self->{'constants'}->{$formula}; + eval($self->{'constants'}->{$formula}); } } else { $t{$cell}=$formula;