Mercurial > hg > xemacs-beta

comparison lisp/finder.el @ 406:b8cc9ab3f761 r21-2-33

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-33
author cvs
date Mon, 13 Aug 2007 11:17:09 +0200
parents 74fd4e045ea6
children de805c49cfc1
comparison
equal deleted inserted replaced
405:0e08f63c74d2 406:b8cc9ab3f761
165 (insert "\n(defconst finder-package-info '(\n") 165 (insert "\n(defconst finder-package-info '(\n")
166 (mapcar 166 (mapcar
167 (lambda (d) 167 (lambda (d)
168 (mapcar 168 (mapcar
169 (lambda (f) 169 (lambda (f)
170 (when (not (member f processed)) 170 (when (and (not (member f processed)) (file-readable-p f))
171 (let (summary keystart keywords) 171 (let (summary keystart keywords)
172 (setq processed (cons f processed)) 172 (setq processed (cons f processed))
173 (if (not finder-compile-keywords-quiet) 173 (if (not finder-compile-keywords-quiet)
174 (message "Processing %s ..." f)) 174 (message "Processing %s ..." f))
175 (save-excursion 175 (save-excursion