From 5e715c6424ff2060891668d11e76089b22e99db0 Mon Sep 17 00:00:00 2001 From: Matt Huszagh Date: Mon, 24 Aug 2020 15:39:04 -0700 Subject: [PATCH] check for existance of org-directory before searching it --- org-ql-search.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/org-ql-search.el b/org-ql-search.el index f84dfed..b864878 100644 --- a/org-ql-search.el +++ b/org-ql-search.el @@ -240,7 +240,8 @@ automatically from the query." When RECURSE is non-nil, recurse into subdirectories. When REGEXP is non-nil, only return files that match REGEXP." (let ((files (->> directories - (--map (f-files it nil recurse)) + (--map (if (f-exists-p it) + (f-files it nil recurse))) -flatten))) (if regexp (--select (string-match regexp it)