Mercurial > hg > xemacs-beta
diff lisp/find-paths.el @ 531:0493e9f3c27f
[xemacs-hg @ 2001-05-12 11:16:12 by ben]
event-msw.c: eliminate cygwin warnings.
dired.c, syswindows.h, win32.c: find the Net* functions the hard way to avoid errors on win 9x.
find-paths.el: fix error with null EXCLUDE-REGEXP.
font-lock.el: fix problem reported by hrvoje with buffers starting with a space.
lib-complete.el: add a variable to control where `find-library' looks, analogous to `find-function-source-path'.
etags.c: new version from Francesco.
Makefile.in.in: i'm getting real tired of incomplete commits. is this getting worse or something?
author | ben |
---|---|
date | Sat, 12 May 2001 11:16:25 +0000 |
parents | abe6d1db359e |
children | 6a0eecc6df0e |
line wrap: on
line diff
--- a/lisp/find-paths.el Fri May 11 05:49:46 2001 +0000 +++ b/lisp/find-paths.el Sat May 12 11:16:25 2001 +0000 @@ -69,7 +69,8 @@ (directory-files directory nil "^[^.-]"))) (reverse-dirs '())) (while raw-entries - (if (null (string-match exclude-regexp (car raw-entries))) + (if (not (and exclude-regexp + (string-match exclude-regexp (car raw-entries)))) (setq reverse-dirs (cons (expand-file-name (car raw-entries) directory) reverse-dirs)))