diff options
Diffstat (limited to 'lisp/calc/calc-store.el')
| -rw-r--r-- | lisp/calc/calc-store.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/calc/calc-store.el b/lisp/calc/calc-store.el index a5e9012dec6..ee29c440fe4 100644 --- a/lisp/calc/calc-store.el +++ b/lisp/calc/calc-store.el @@ -437,10 +437,10 @@ (if (eq (car-safe value) 'special-const) (error "%s is a special constant" var)) (setq calc-last-edited-variable var) - (calc-edit-mode (list 'calc-finish-stack-edit (list 'quote var)) - t - (format-message - "Editing variable `%s'" (calc-var-name var))) + (calc--edit-mode (lambda () (calc-finish-stack-edit var)) + t + (format-message + "Editing variable `%s'" (calc-var-name var))) (and value (insert (math-format-nice-expr value (frame-width)) "\n"))))) (calc-show-edit-buffer)) |