[Emacs-diffs] Changes to emacs/lisp/calc/calc-ext.el,v

[Juanma Barranquero]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Juanma Barranquero <lektu>      07/09/26 00:05:27

Index: calc-ext.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/calc/calc-ext.el,v
retrieving revision 1.59
retrieving revision 1.60
diff -u -b -r1.59 -r1.60
--- calc-ext.el 17 Aug 2007 20:19:36 -0000      1.59
+++ calc-ext.el 26 Sep 2007 00:05:27 -0000      1.60
@@ -618,7 +618,7 @@
 
   (calc-init-prefixes)
 
-  (mapcar (function
+  (mapc (function
           (lambda (x)
             (define-key calc-mode-map (format "c%c" x) 'calc-clean-num)
             (define-key calc-mode-map (format "j%c" x) 'calc-select-part)
@@ -651,7 +651,7 @@
   (define-key calc-alg-map "\e\177" 'calc-pop-above)
 
 ;;;; (Autoloads here)
-  (mapcar (function (lambda (x)
+  (mapc (function (lambda (x)
     (mapcar (function (lambda (func)
       (autoload func (car x)))) (cdr x))))
     '(
@@ -1277,7 +1277,7 @@
             calc-redo-list nil)
       (let (calc-stack calc-user-parse-tables calc-standard-date-formats
                        calc-invocation-macro)
-        (mapcar (function (lambda (v) (set v nil))) calc-local-var-list)
+        (mapc (function (lambda (v) (set v nil))) calc-local-var-list)
         (if (and arg (<= arg 0))
             (calc-mode-var-list-restore-default-values)
           (calc-mode-var-list-restore-saved-values)))