1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-22 07:09:54 +00:00

(finder-compile-keywords): Use mapc' rather than mapcar'.

This commit is contained in:
Juanma Barranquero 2007-09-25 11:06:40 +00:00
parent 1259dfc955
commit 3731290f9e

View File

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