(finder-compile-keywords): Don't process file names that start with `.'.

This commit is contained in:
Richard M. Stallman 1997-08-05 17:10:16 +00:00
parent 1d0d784f03
commit 6656e09937

View file

@ -117,7 +117,7 @@ arguments compiles from `load-path'."
(lambda (d)
(mapcar
(lambda (f)
(if (and (string-match "^[^=].*\\.el$" f)
(if (and (string-match "^[^=.].*\\.el$" f)
(not (member f processed)))
(let (summary keystart keywords)
(setq processed (cons f processed))