From 62b4dbbd8e706cca64edb156a2a045eceedf1505 Mon Sep 17 00:00:00 2001 From: ndwarshuis Date: Wed, 2 Mar 2022 20:05:20 -0500 Subject: [PATCH] ENH only check for property block when we know we have a real node --- local/lib/org-x/org-x-dag.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/local/lib/org-x/org-x-dag.el b/local/lib/org-x/org-x-dag.el index 6a2314a..a1fce56 100644 --- a/local/lib/org-x/org-x-dag.el +++ b/local/lib/org-x/org-x-dag.el @@ -1217,7 +1217,6 @@ headline." this-tags (-some-> (match-string-no-properties 4) (split-string ":" t)) next-pos (or (org-x-dag-next-headline) (point-max)) - this-prop-bounds (org-x-dag-property-block next-pos) this-key nil this-links nil) ;; Adjust the stack so that the top headline is the parent of the @@ -1230,7 +1229,9 @@ headline." ;; if its parent has a keyword or none of its parents have keywords (when (and this-todo (or this-parent-key (--none-p (nth 1 it) cur-path)) - (setq this-key (org-x-dag-get-local-property this-prop-bounds "ID"))) + (setq + this-prop-bounds (org-x-dag-property-block next-pos) + this-key (org-x-dag-get-local-property this-prop-bounds "ID"))) ;; If parent is not a todo and we want tag inheritance, store all ;; tags above this headline (including file tags) (setq all-tags (if (and (not this-parent-key) org-use-tag-inheritance)