jiri/org-ql
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Merge: 0.4.7

Browse source
This commit is contained in:
Adam Porter 2020-11-16 02:29:13 -06:00
commit 7b1919c2d5
3 changed files with 89 additions and 65 deletions
Download patch file Download diff file Expand all files Collapse all files

9
org-ql-search.el
View file

@ -331,9 +331,12 @@ For example, an org-ql dynamic block header could look like:
;;;; Functions
(cl-defun org-ql-search-directories-files (&key (directories (list org-directory))
(recurse org-ql-search-directories-files-recursive)
(regexp org-ql-search-directories-files-regexp))
(cl-defun org-ql-search-directories-files
(&key (directories (if (file-exists-p org-directory)
(list org-directory)
(user-error "org-ql-search-directories-files: No DIRECTORIES given, and `org-directory' doesn't exist")))
(recurse org-ql-search-directories-files-recursive)
(regexp org-ql-search-directories-files-regexp))
"Return list of matching files in DIRECTORIES, a list of directory paths.
When RECURSE is non-nil, recurse into subdirectories. When
REGEXP is non-nil, only return files that match REGEXP."