diff --git a/org-ql-find.el b/org-ql-find.el index e6c4795..ebfd612 100644 --- a/org-ql-find.el +++ b/org-ql-find.el @@ -117,7 +117,10 @@ which see (but only the files are used)." (cl-loop for (files-spec . _candidate-spec) in org-refile-targets append (cl-typecase files-spec (null (list (current-buffer))) - (symbol (pcase (funcall files-spec) + (function (pcase (funcall files-spec) + ((and (pred stringp) file) (list file)) + ((and (pred listp) files) files))) + (symbol (pcase (eval files-spec) ((and (pred stringp) file) (list file)) ((and (pred listp) files) files))) (list files-spec)))))))