diff options
Diffstat (limited to 'lisp/calc/calc-aent.el')
| -rw-r--r-- | lisp/calc/calc-aent.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/calc/calc-aent.el b/lisp/calc/calc-aent.el index 22afd43a34..f0a56931be 100644 --- a/lisp/calc/calc-aent.el +++ b/lisp/calc/calc-aent.el @@ -414,8 +414,7 @@ The value t means abort and give an error message.") (interactive) (let* ((str (minibuffer-contents)) (exp (and (> (length str) 0) - (save-excursion - (set-buffer calc-buffer) + (with-current-buffer calc-buffer (math-read-exprs str))))) (if (eq (car-safe exp) 'error) (progn |