version 1.155, 2002/12/05 15:31:05
|
version 1.156, 2002/12/09 14:50:11
|
Line 3129 ENDSCRIPT
|
Line 3129 ENDSCRIPT
|
# If a new formula had been entered, go from work copy |
# If a new formula had been entered, go from work copy |
if ($ENV{'form.unewfield'}) { |
if ($ENV{'form.unewfield'}) { |
$r->print('<h2>Modified Workcopy</h2>'); |
$r->print('<h2>Modified Workcopy</h2>'); |
$ENV{'form.unewformula'}=~s/\'/\"/g; |
#$ENV{'form.unewformula'}=~s/\'/\"/g; |
$r->print('<p>Cell '.$ENV{'form.unewfield'}.' = <pre>'); |
$r->print('<p>Cell '.$ENV{'form.unewfield'}.' = <pre>'); |
$r->print(&HTML::Entities::encode($ENV{'form.unewformula'}). |
$r->print(&HTML::Entities::encode($ENV{'form.unewformula'}). |
'</pre></p>'); |
'</pre></p>'); |