From c2a84ec7219bb56de9f45e314c35b39c3a17f13c Mon Sep 17 00:00:00 2001
From: Marc <marc>
Date: Tue, 31 Jan 2023 15:21:48 +0100
Subject: [PATCH] changed tag for roam agenda from project to roamtodo

---
 config.org | 22 +++++++++++-----------
 1 file changed, 11 insertions(+), 11 deletions(-)

diff --git a/config.org b/config.org
index 70c6614..08982fc 100644
--- a/config.org
+++ b/config.org
@@ -1070,7 +1070,7 @@ org-roam-db-sync
     :init
     (setq org-roam-v2-ack t)
 
-    (defun my--project-p ()
+    (defun my--roamtodo-p ()
       "Return non-nil if current buffer has any todo entry.
 
 TODO entries marked as done are ignored, meaning this function
@@ -1084,17 +1084,17 @@ returns nil if current buffer contains only completed tasks."
          (lambda (h)
            (org-element-property :todo-type h)))))
 
-    (defun my--project-update-tag ()
-      "Update PROJECT tag in the current buffer."
+    (defun my--roamtodo-update-tag ()
+      "Update ROAMTODO tag in the current buffer."
       (when (and (not (active-minibuffer-window))
                  (my--buffer-roam-note-p))
         (save-excursion
           (goto-char (point-min))
           (let* ((tags (my--buffer-tags-get))
                  (original-tags tags))
-            (if (my--project-p)
-                (setq tags (cons "project" tags))
-              (setq tags (remove "project" tags)))
+            (if (my--roamtodo-p)
+                (setq tags (cons "roamtodo" tags))
+              (setq tags (remove "roamtodo" tags)))
 
             ;;cleanup duplicates
             (when (or (seq-difference tags original-tags)
@@ -1200,20 +1200,20 @@ If nil it defaults to `split-string-default-separators', normally
                (org-roam-node-list))))
 
     (defun my/org-roam-refresh-agenda-list ()
-      "Add all org roam files with #+filetags: project"
+      "Add all org roam files with #+filetags: roamtodo"
       (interactive)
       (my--org-agenda-files-set)
       (nconc org-agenda-files
-             (my--org-roam-list-notes-by-tag "project"))
+             (my--org-roam-list-notes-by-tag "roamtodo"))
       (setq org-agenda-files (delete-dups org-agenda-files)))
     
-    (add-hook 'find-file-hook #'my--project-update-tag)
-    (add-hook 'before-save-hook #'my--project-update-tag)
+    (add-hook 'find-file-hook #'my--roamtodo-update-tag)
+    (add-hook 'before-save-hook #'my--roamtodo-update-tag)
 
     (advice-add 'org-agenda :before #'my/org-roam-refresh-agenda-list)
     (advice-add 'org-todo-list :before #'my/org-roam-refresh-agenda-list)
 
-    (add-to-list 'org-tags-exclude-from-inheritance "project")
+    (add-to-list 'org-tags-exclude-from-inheritance "roamtodo")
     :config
     (require 'org-roam-dailies) ;; ensure the keymap is available
     (org-roam-db-autosync-mode)