* lisp/calc/calc-sel.el (calc-replace-sub-formula): Fix typo

Reported by Sébastien Miquel <sebastien.miquel@posteo.eu>
This commit is contained in:
Stefan Monnier 2021-02-15 10:57:26 -05:00
parent fc4927fc3a
commit 211731b3a9

View file

@ -486,8 +486,8 @@
(defun calc-replace-sub-formula (expr rsf-old rsf-new)
(let ((calc-rsf-old rsf-old)
(calc-rsf-new (calc-encase-atoms rsf-new))))
(calc-replace-sub-formula-rec expr))
(calc-rsf-new (calc-encase-atoms rsf-new)))
(calc-replace-sub-formula-rec expr)))
(defun calc-replace-sub-formula-rec (expr)
(cond ((eq expr calc-rsf-old) calc-rsf-new)