From 2b40cb556f09575b2cf0d829e33f3e854dbe914c Mon Sep 17 00:00:00 2001 From: Benson Chu Date: Thu, 22 Jun 2023 14:55:00 -0500 Subject: [PATCH] Nope, that's not right --- lisp/org-ql-custom-stuck-projects.el | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/lisp/org-ql-custom-stuck-projects.el b/lisp/org-ql-custom-stuck-projects.el index ed223ae..3e0c1cd 100644 --- a/lisp/org-ql-custom-stuck-projects.el +++ b/lisp/org-ql-custom-stuck-projects.el @@ -200,8 +200,7 @@ (not (done)) (odl/part-of-current-level-p) ,@my/is-project-short-circuit - (or (eq 'active (opr/type-of-task)) - (eq 'active (opr/type-of-project 'active)))) + (eq 'active (opr/type-of-project 'active))) :action 'element-with-markers :narrow narrow-p :sort 'todo)))) @@ -246,8 +245,7 @@ `((tags ,tag))) (odl/part-of-current-level-p) ,@my/is-project-short-circuit - (or (eq 'active (opr/type-of-task)) - (eq 'active (opr/type-of-project 'active)))) + (eq 'active (opr/type-of-project 'active))) :action 'element-with-markers :narrow narrow-p :sort 'todo))))