diff options
| author | Colin Walters <walters@gnu.org> | 2002-09-30 04:24:40 +0000 |
|---|---|---|
| committer | Colin Walters <walters@gnu.org> | 2002-09-30 04:24:40 +0000 |
| commit | 2528da6a32002a7d597784e4dde02453625f68ef (patch) | |
| tree | 3794762a14e4f4d01637fa85e81cfa7d0d6f8f1b /lisp/calc | |
| parent | 9b08ce78d24d2fac7092afe3ace0f4bbac5d1544 (diff) | |
| download | emacs-2528da6a32002a7d597784e4dde02453625f68ef.tar.gz | |
(calc-reset): Don't bind `executing-kbd-macro'. Call
`calc-flush-caches' with inhibit-msg arg.
(calc-change-mode): Remove extra arg for `calc-save-modes'.
Diffstat (limited to 'lisp/calc')
| -rw-r--r-- | lisp/calc/calc-ext.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/calc/calc-ext.el b/lisp/calc/calc-ext.el index 66daedf02e2..7caad434729 100644 --- a/lisp/calc/calc-ext.el +++ b/lisp/calc/calc-ext.el @@ -1288,8 +1288,7 @@ calc-kill calc-kill-region calc-yank)))) calc-mode-var-list)) (calc-set-language nil nil t) (calc-mode) - (let ((executing-kbd-macro "")) ; inhibit message - (calc-flush-caches)) + (calc-flush-caches t) (run-hooks 'calc-reset-hook)) (calc-wrapper (let ((win (get-buffer-window (current-buffer)))) @@ -1486,7 +1485,7 @@ calc-kill calc-kill-region calc-yank)))) (calc-refresh-evaltos)) (and (eq calc-mode-save-mode 'save) (not (equal var '(calc-mode-save-mode))) - (calc-save-modes t)))) + (calc-save-modes)))) (if calc-embedded-info (calc-embedded-modes-change var)) (symbol-value (car var))))) |