Commit 66ba97ee authored by Glenn Morris's avatar Glenn Morris
Browse files

(ses-calculate-cell): Don't evaluate unsafe formulae.

parent f3d7e5c4
......@@ -628,8 +628,9 @@ the old and FORCE is nil."
(let ((oldval (ses-cell-value cell))
(formula (ses-cell-formula cell))
(if (eq (car-safe formula) 'ses-safe-formula)
(ses-set-cell row col 'formula (ses-safe-formula (cadr formula))))
(when (eq (car-safe formula) 'ses-safe-formula)
(setq formula (ses-safe-formula (cadr formula)))
(ses-set-cell row col 'formula formula))
(condition-case sig
(setq newval (eval formula))
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment