-(dolist (org-file (directory-files-recursively default-directory "\\.org$"))
+(dolist (org-file (directory-files-recursively
+                  default-directory "\\.org$"
+                  nil (lambda (n) (not (string-match-p "archive" n)))))

Won't it also discard all the files with word "archive" in them?
We don't have any now, but I imagine someone writing
org-archive-tips.org at some point - it will be ignored.

-- 
Ihor Radchenko // yantar92,
Org mode contributor,
Learn more about Org mode at <https://orgmode.org/>.
Support Org development at <https://liberapay.com/org-mode>,
or support my work at <https://liberapay.com/yantar92>

Reply via email to