# HG changeset patch
# User Colin Walters <walters@gnu.org>
# Date 1033359880 0
# Node ID 37adf7fffb23c48f78b175c2201d40df3606d05a
# Parent  c7b1f2c10ed47141a602a902cc0372eb79f08005
(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 -r c7b1f2c10ed4 -r 37adf7fffb23 lisp/calc/calc-ext.el
--- a/lisp/calc/calc-ext.el	Mon Sep 30 04:23:37 2002 +0000
+++ b/lisp/calc/calc-ext.el	Mon Sep 30 04:24:40 2002 +0000
@@ -1288,8 +1288,7 @@
 	      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-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)))))