# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1190765257 0
# Node ID bc733cde4fff124f76fec8621f23a0071f327a35
# Parent  fa8470bb9f1a2dabf868f21e208336cbd33b0a5f
(calc-flush-caches): Use `mapc' rather than `mapcar'.

diff -r fa8470bb9f1a -r bc733cde4fff lisp/calc/calc-stuff.el
--- a/lisp/calc/calc-stuff.el	Wed Sep 26 00:07:05 2007 +0000
+++ b/lisp/calc/calc-stuff.el	Wed Sep 26 00:07:37 2007 +0000
@@ -191,7 +191,7 @@
 	 math-eval-rules-cache-tag t
 	 math-format-date-cache nil
 	 math-holidays-cache-tag t)
-   (mapcar (function (lambda (x) (set x -100))) math-cache-list)
+   (mapc (function (lambda (x) (set x -100))) math-cache-list)
    (unless inhibit-msg
      (message "All internal calculator caches have been reset"))))