--- loncom/interface/Attic/lonspreadsheet.pm 2002/12/05 15:31:05 1.155 +++ loncom/interface/Attic/lonspreadsheet.pm 2002/12/09 14:50:11 1.156 @@ -1,5 +1,5 @@ # -# $Id: lonspreadsheet.pm,v 1.155 2002/12/05 15:31:05 matthew Exp $ +# $Id: lonspreadsheet.pm,v 1.156 2002/12/09 14:50:11 matthew Exp $ # # Copyright Michigan State University Board of Trustees # @@ -3129,7 +3129,7 @@ ENDSCRIPT # If a new formula had been entered, go from work copy if ($ENV{'form.unewfield'}) { $r->print('

Modified Workcopy

'); - $ENV{'form.unewformula'}=~s/\'/\"/g; + #$ENV{'form.unewformula'}=~s/\'/\"/g; $r->print('

Cell '.$ENV{'form.unewfield'}.' =

');
         $r->print(&HTML::Entities::encode($ENV{'form.unewformula'}).
                   '

');