# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1190718400 0
# Node ID 19e1cc64b115146fbd8c6b0233b40bd15d4f2d3b
# Parent  9ee30350a5a4b18c851a6840c6256943271896cc
(finder-compile-keywords): Use `mapc' rather than `mapcar'.

diff -r 9ee30350a5a4 -r 19e1cc64b115 lisp/finder.el
--- a/lisp/finder.el	Tue Sep 25 11:06:14 2007 +0000
+++ b/lisp/finder.el	Tue Sep 25 11:06:40 2007 +0000
@@ -134,7 +134,7 @@
       (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)