home

commit b4a542f7f5cff7eb63a04f4d13ac481f11ca1b0f
parent b30a0a488b8d6e2571f8fad6abb4517fb7199632
Author: Vincent Demeester <vincent@sbr.pm>
Date:   Wed, 12 Jun 2024 11:32:58 +0200

tools/emacs: add src-www-dir to config-org

The idea is to keep the TODOs in that project directly.

Signed-off-by: Vincent Demeester <vincent@sbr.pm>

Diffstat:
M
tools/emacs/config/config-org.el
 | 
10
+++++++++-

1 file changed, 9 insertions(+), 1 deletion(-)
diff --git a/tools/emacs/config/config-org.el b/tools/emacs/config/config-org.el
@@ -38,6 +38,9 @@
 
 (defconst src-home-dir (expand-file-name "~/src/home" org-directory)
   "Directory of my home monorepository, can contain todos there.")
+;; 2024-06-11: Should it be in home ? I've been going back and forth on this
+(defconst src-www-dir (expand-file-name "~/src/www" org-directory)
+  "Directory of my www repository, can contain todos there.")
 
 (defconst org-babel-library-file (expand-file-name "org_library_of_babel.org" org-directory)
   "Org babel library.")
@@ -152,7 +155,7 @@
 			(lambda (directory)
 			  (directory-files-recursively
 			   directory org-agenda-file-regexp))
-			`(,org-projects-dir ,org-areas-dir ,org-resources-dir ,org-journal-dir ,src-home-dir ,(expand-file-name "~/src/osp/tasks")))))
+			`(,org-projects-dir ,org-areas-dir ,org-resources-dir ,org-journal-dir ,src-home-dir ,src-www-dir ,(expand-file-name "~/src/osp/tasks")))))
   (defun vde/reload-org-agenda-files ()
     "Reload org-agenda-files variables with up-to-date org files"
     (interactive)
@@ -179,6 +182,11 @@
 				    (--map (format "%s" it))
 				    (--map `(,it :maxlevel . 2)))
 				   (->>
+				    (directory-files-recursively src-www-dir ".org$")
+				    (--remove (s-starts-with? "." it))
+				    (--map (format "%s" it))
+				    (--map `(,it :maxlevel . 2)))
+				   (->>
 				    (directory-files-recursively org-resources-dir ".org$")
 				    (--remove (s-starts-with? (format "%s/legacy" org-resources-dir) it))
 				    (--map (format "%s" it))