procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* files.el (file-expand-wildcards): Ignore non-readable

Browse source 
sub-directories while trying to find matches instead of signalling
an error (bug#6297).
This commit is contained in:
Lars Magne Ingebrigtsen 2011-07-03 03:48:07 +02:00
parent 0dd8b6da56
commit 28fd8759b3
2 changed files with 6 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/ChangeLog
View file

@ -1,5 +1,9 @@
2011-07-03 Lars Magne Ingebrigtsen <larsi@gnus.org>
* files.el (file-expand-wildcards): Ignore non-readable
sub-directories while trying to find matches instead of signalling
an error (bug#6297).
* man.el (Man-reference-regexp): Allow matching possible
word-wrapped references (bug#6289).

3
lisp/files.el
View file

@ -5560,7 +5560,8 @@ default directory. However, if FULL is non-nil, they are absolute."
contents)
(while dirs
(when (or (null (car dirs)) ; Possible if DIRPART is not wild.
(file-directory-p (directory-file-name (car dirs))))
(and (file-directory-p (directory-file-name (car dirs)))
(file-readable-p (car dirs))))
(let ((this-dir-contents
;; Filter out "." and ".."
(delq nil