chris <numbch...@gmail.com> writes:

> How to Let [C-c a] to search over all files in a directory *recursively* ?

AFAIK, there's no built in way.

Applying the following patch to the function org-agenda-files gets you
there, but it's not clean at all, and certainly very unefficient :

        Modified   lisp/org.el
diff --git a/lisp/org.el b/lisp/org.el
index 7fd1576..0068c49 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -17797,8 +17797,7 @@ used by the agenda files.  If ARCHIVE is `ifmode', do 
this only if
     (setq files (apply 'append
                       (mapcar (lambda (f)
                                 (if (file-directory-p f)
-                                    (directory-files
-                                     f t org-agenda-file-regexp)
+                                    (find-lisp-find-files f 
org-agenda-file-regexp)
                                   (list f)))
                               files)))
     (when org-agenda-skip-unavailable-files

Also it might be faster to rely on an external "find" tool but that requires
modifying the regexp (-regex applies to whole path).

HTH,

-- 
N.

Reply via email to