1 files changed, 1 insertions, 1 deletions

diff --git a/lisp/finder.el b/lisp/finder.el
index 11da543bfe7..d1438dbf17e 100644
--- a/lisp/finder.el
+++ b/lisp/finder.el
@@ -134,7 +134,7 @@ no arguments compiles from `load-path'."
       (insert ";; Don't edit this file.  It's generated by finder.el\n\n")
       (insert ";;; Code:\n")
       (insert "\n(setq finder-package-info '(\n")
-      (mapcar
+      (mapc
        (lambda (d)
          (when (file-exists-p (directory-file-name d))
            (message "Directory %s" d)