diff options
author | Tom Willemse | 2024-02-15 12:57:14 -0800 |
---|---|---|
committer | Tom Willemse | 2024-02-15 12:57:14 -0800 |
commit | 3d17ef6cb2cfe3c48e308d18e903001b94a236e7 (patch) | |
tree | aa1fcff525963f61394380701121257dd77a5e2e | |
parent | 3d4924adbfe2eb03fdfc0d37663e363e5748429f (diff) | |
download | emacs-config-3d17ef6cb2cfe3c48e308d18e903001b94a236e7.tar.gz emacs-config-3d17ef6cb2cfe3c48e308d18e903001b94a236e7.zip |
[oni-org] Remove roam files from agenda, move roam database
-rw-r--r-- | oni-org-roam.el | 21 | ||||
-rw-r--r-- | oni-org/oni-org.el | 6 |
2 files changed, 3 insertions, 24 deletions
diff --git a/oni-org-roam.el b/oni-org-roam.el index 9a21f65..e33b103 100644 --- a/oni-org-roam.el +++ b/oni-org-roam.el @@ -33,7 +33,7 @@ (require 'seq) (setq org-roam-completion-everywhere t) -(setq org-roam-directory (expand-file-name "~/documents/exocortex/")) +(setq org-roam-directory (expand-file-name "~/documents/exocortex-novus/reference/")) (add-hook 'org-roam-mode-hook 'visual-line-mode) @@ -49,23 +49,6 @@ (not (window-minibuffer-p))) (org-roam-buffer-toggle)))) -;;; Taken from/inspired by -;;; https://magnus.therning.org/2021-07-23-keeping-todo-items-in-org-roam-v2.html -(defun oni-org-roam-update-todo-files (&rest _) - "Set ‘org-agenda-files’ to all roam files with a task in them." - (setq org-agenda-files (seq-uniq (append org-agenda-files (oni-org-roam--todo-files))))) - -(defun oni-org-roam--todo-files () - "Get a list of all the files in the org-roam database with tasks in them." - (let ((nodes (seq-filter #'oni-org-roam--todo-node-p (org-roam-node-list)))) - (seq-uniq (seq-map #'org-roam-node-file nodes)))) - -(defun oni-org-roam--todo-node-p (node) - "Predicate to check whether or not NODE is task." - (let ((state (org-roam-node-todo node))) - (and (not (null state)) - (not (string= state "FINISHED"))))) - (defun oni-org-roam--books-to-read () (org-roam-db-query (concat "select properties, file, title, group_concat(tag) as node_tags " "from nodes " @@ -99,8 +82,6 @@ (slot . 0) (window-width . 66))) -(advice-add 'org-agenda :before #'oni-org-roam-update-todo-files) - ;;; These two properties are used a lot when working in ‘org-roam'. ‘ROAM_REFS' ;;; is used to specify a URL that (if pointed to) should be considered a ;;; reference to a particular note. ‘ROAM_ALIASES' sets up additional names for diff --git a/oni-org/oni-org.el b/oni-org/oni-org.el index 5d2ebf4..beef7b9 100644 --- a/oni-org/oni-org.el +++ b/oni-org/oni-org.el @@ -4,7 +4,7 @@ ;; Author: Tom Willemse <tom@ryuslash.org> ;; Keywords: local -;; Version: 2024.0201.163746 +;; Version: 2024.0201.164329 ;; Package-Requires: (oni-yasnippet oni-alert oni-hydra org org-bullets org-edna diminish all-the-icons olivetti form-feed org-pretty-table ob-async) ;; This program is free software; you can redistribute it and/or modify @@ -638,9 +638,7 @@ also move point to the start of the heading." (org-roam-db-query [:select :distinct file :from nodes :where (= todo $s1)] "TODO"))) -(setq org-agenda-files - (cons oni-org-todo-main-file - (oni-org-roam-todo-files))) +(setq org-agenda-files (list oni-org-todo-main-file)) (setq org-agenda-tags-todo-honor-ignore-options t) (setq org-agenda-todo-ignore-scheduled 'future) (setq org-agenda-restore-windows-after-quit t) |