diff options
| author | Juanma Barranquero | 2007-09-25 11:06:40 +0000 |
|---|---|---|
| committer | Juanma Barranquero | 2007-09-25 11:06:40 +0000 |
| commit | 3731290f9efcdf0b00c012ff82006265fb7d2d37 (patch) | |
| tree | b54f403f80d2775b367557d6d7959413fc92db3a | |
| parent | 1259dfc955b6dd193def48cbf46127ee5aeb794b (diff) | |
| download | emacs-3731290f9efcdf0b00c012ff82006265fb7d2d37.tar.gz emacs-3731290f9efcdf0b00c012ff82006265fb7d2d37.zip | |
(finder-compile-keywords): Use `mapc' rather than `mapcar'.
| -rw-r--r-- | lisp/finder.el | 2 |
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'." | |||
| 134 | (insert ";; Don't edit this file. It's generated by finder.el\n\n") | 134 | (insert ";; Don't edit this file. It's generated by finder.el\n\n") |
| 135 | (insert ";;; Code:\n") | 135 | (insert ";;; Code:\n") |
| 136 | (insert "\n(setq finder-package-info '(\n") | 136 | (insert "\n(setq finder-package-info '(\n") |
| 137 | (mapcar | 137 | (mapc |
| 138 | (lambda (d) | 138 | (lambda (d) |
| 139 | (when (file-exists-p (directory-file-name d)) | 139 | (when (file-exists-p (directory-file-name d)) |
| 140 | (message "Directory %s" d) | 140 | (message "Directory %s" d) |