(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'.

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)))))