X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=blobdiff_plain;f=lisp%2Ffinder.el;h=503b7f8bd1870304d56801ca5755eeed94322787;hp=b0fa4deb223568fb2af99dc39284e4314d776c80;hb=a1655b870904de973c366d85ebdc8adde4ef5e1e;hpb=c855f9c824a0fc23e52e92d65ec8a34bd51cddd7

diff --git a/lisp/finder.el b/lisp/finder.el
index b0fa4de..503b7f8 100644
--- a/lisp/finder.el
+++ b/lisp/finder.el
@@ -167,7 +167,7 @@ arguments compiles from `load-path'."
        (lambda (d)
 	 (mapcar
 	  (lambda (f) 
-	    (when (not (member f processed))
+	    (when (and (not (member f processed)) (file-readable-p f))
 	      (let (summary keystart keywords)
 		(setq processed (cons f processed))
 		(if (not finder-compile-keywords-quiet)