--- loncom/interface/spreadsheet/assesscalc.pm	2003/05/22 20:06:09	1.3
+++ loncom/interface/spreadsheet/assesscalc.pm	2003/05/22 20:23:56	1.4
@@ -1,5 +1,5 @@
 #
-# $Id: assesscalc.pm,v 1.3 2003/05/22 20:06:09 matthew Exp $
+# $Id: assesscalc.pm,v 1.4 2003/05/22 20:23:56 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -526,7 +526,10 @@ sub compute {
     while (my ($parm,$value) = each(%parameters)) {
         my $cell = 'A'.$self->get_row_number_from_key($parm);
         $f{$cell} = $parm;
-        $c{$parm} = '"'.$value.'"';
+        $c{$parm} = '';
+        if ($value ne '') {
+            $c{$parm} = '"'.$value.'"';
+        }
     }
     $self->formulas(%f);
     $self->constants(%c);