From 5b0557d8fcebdd9b30a702db68745aa2b5ad5b24 Mon Sep 17 00:00:00 2001 From: petrucci4prez Date: Tue, 26 Jun 2018 23:02:21 -0400 Subject: [PATCH] cleaned up proj task skip function --- conf.el | 7 +------ conf.org | 8 +------- 2 files changed, 2 insertions(+), 13 deletions(-) diff --git a/conf.el b/conf.el index ddd2b47..216e69f 100644 --- a/conf.el +++ b/conf.el @@ -861,12 +861,7 @@ tags that do not have tags in neg-tags-list" (if (member keyword nd/project-skip-todostates) (nd/skip-subtree) (nd/skip-heading)) - (if (not (and (nd/heading-has-parent 'nd/is-todoitem-p) - (not (nd/is-timestamped-heading-p)) - (not (nd/is-scheduled-heading-p)) - (not (nd/is-deadlined-heading-p)) - ;; (equal keyword skip-keyword) - )) + (if (not (nd/heading-has-parent 'nd/is-todoitem-p)) (nd/skip-heading))) (nd/skip-heading))))) diff --git a/conf.org b/conf.org index b85c1cd..05a3a11 100644 --- a/conf.org +++ b/conf.org @@ -1146,15 +1146,9 @@ which is dealt with similarly) (if (member keyword nd/project-skip-todostates) (nd/skip-subtree) (nd/skip-heading)) - (if (not (and (nd/heading-has-parent 'nd/is-todoitem-p) - (not (nd/is-timestamped-heading-p)) - (not (nd/is-scheduled-heading-p)) - (not (nd/is-deadlined-heading-p)) - ;; (equal keyword skip-keyword) - )) + (if (not (nd/heading-has-parent 'nd/is-todoitem-p)) (nd/skip-heading))) (nd/skip-heading))))) - #+END_SRC **** header-level errors Some headers are invalid under certain conditions