From 7432982e6a2462d59300f5a9d1ba54d0f8ef56a4 Mon Sep 17 00:00:00 2001 From: Tom Willemse Date: Tue, 23 Nov 2021 00:40:28 -0800 Subject: [PATCH] [oni-org-roam] Don't include headings that are FINISHED in my agenda --- oni-org-roam.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/oni-org-roam.el b/oni-org-roam.el index 68b6b22..423de70 100644 --- a/oni-org-roam.el +++ b/oni-org-roam.el @@ -4,7 +4,7 @@ ;; Author: Tom Willemse ;; Keywords: local -;; Version: 2021.1116.213141 +;; Version: 2021.1116.222944 ;; Package-Requires: (oni-org org-roam) ;; This program is free software; you can redistribute it and/or modify @@ -40,7 +40,9 @@ ;;; https://magnus.therning.org/2021-07-23-keeping-todo-items-in-org-roam-v2.html (defun oni-org-roam--todo-node-p (node) "Predicate to check whether or not NODE is task." - (not (null (org-roam-node-todo node)))) + (let ((state (org-roam-node-todo node))) + (and (not (null state)) + (not (string= state "FINISHED"))))) (defun oni-org-roam--todo-files () "Get a list of all the files in the org-roam database with tasks in them."