From 74e491ad860d28512686efd8e631e49f33c0c321 Mon Sep 17 00:00:00 2001 From: Guangxiong Lin Date: Sun, 13 Mar 2022 11:45:11 +0800 Subject: Update my definition of stuck projects (emacs) --- .emacs.d/lisp/init-org.el | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) (limited to '.emacs.d') diff --git a/.emacs.d/lisp/init-org.el b/.emacs.d/lisp/init-org.el index 2e27d34..3efe427 100644 --- a/.emacs.d/lisp/init-org.el +++ b/.emacs.d/lisp/init-org.el @@ -11,8 +11,11 @@ "A block showing weekly schedule.") (defvar gx/org-agenda-block--stuck-projects - '(org-ql-block '(and (tags "PROJECT") - (not (or (done) (todo "SOMEDAY"))) + '(org-ql-block '(and (or (tags "PROJECT") + (not (ancestors (todo)))) + (todo) + (not (or (done) (todo "SOMEDAY") + (todo "NEXT") (scheduled))) (not (descendants (todo "NEXT"))) (not (descendants (scheduled)))) ((org-ql-block-header "Stuck Projects"))) -- cgit v1.2.3