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

diff --git a/lisp/calc/calc-ext.el b/lisp/calc/calc-ext.el
index 66daedf02e2a7ca6b6362eed3aece8882b8b764b..7caad434729ab9d7f30884a4ebd82f59beb83b46 100644 (file)
--- 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)))))