branch: externals/truename-cache
commit 05d8cd22ba205cc8fbcd246d4edb8771421eeab9
Author: Martin Edström <[email protected]>
Commit: Martin Edström <[email protected]>
Add a forgotten clause
---
truename-cache.el | 2 ++
1 file changed, 2 insertions(+)
diff --git a/truename-cache.el b/truename-cache.el
index a727664a8e..d404245049 100644
--- a/truename-cache.el
+++ b/truename-cache.el
@@ -585,6 +585,8 @@ Otherwise, they are quietly skipped."
(delete-dups
(cl-loop
for dir in (delete-dups (append dirs-flat inferred-dirs))
+ when (or (not FULL-DIR-DENY-RE)
+ (not (string-match-p FULL-DIR-DENY-RE dir)))
as true-dir = (file-name-as-directory (file-truename dir))
when (and (or (file-readable-p true-dir)
(if assert-readable