From 3731290f9efcdf0b00c012ff82006265fb7d2d37 Mon Sep 17 00:00:00 2001
From: Juanma Barranquero <lekktu@gmail.com>
Date: Tue, 25 Sep 2007 11:06:40 +0000
Subject: [PATCH] (finder-compile-keywords): Use `mapc' rather than `mapcar'.

---
 lisp/finder.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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)
-- 
2.39.5