Mercurial > emacs
changeset 84888:23f1c8af4174
(another-calc): Use `mapc' rather than `mapcar'.
author | Juanma Barranquero <lekktu@gmail.com> |
---|---|
date | Wed, 26 Sep 2007 00:06:32 +0000 |
parents | 786766804015 |
children | fa8470bb9f1a |
files | lisp/calc/calc-misc.el |
diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/calc/calc-misc.el Wed Sep 26 00:06:05 2007 +0000 +++ b/lisp/calc/calc-misc.el Wed Sep 26 00:06:32 2007 +0000 @@ -145,9 +145,9 @@ "Create another, independent Calculator buffer." (interactive) (if (eq major-mode 'calc-mode) - (mapcar (function - (lambda (v) - (set-default v (symbol-value v)))) calc-local-var-list)) + (mapc (function + (lambda (v) + (set-default v (symbol-value v)))) calc-local-var-list)) (set-buffer (generate-new-buffer "*Calculator*")) (pop-to-buffer (current-buffer)) (calc-mode))