From 3eb5cd877ca48a2c0d2e907cf4ab7adf32520020 Mon Sep 17 00:00:00 2001 From: Toby S. Cubitt Date: Sat, 28 Jan 2012 18:21:52 +0100 Subject: [PATCH 1/2] Agenda: Fix bug that broke '(nottodo todo) skip condition * lisp/org-agenda.el (org-agenda-skip-if): Fix bug in test for '(nottodo todo) skip condition. Note: certain combinations of multiple conditions may still be broken. --- lisp/org-agenda.el | 4 ++-- 1 files changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index 38fd589..ad706eb 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -4285,8 +4285,8 @@ that can be put into `org-agenda-skip-function' for the duration of a command." (stringp (nth 1 m)) (not (re-search-forward (nth 1 m) end t))) (and (or - (setq m (memq 'todo conditions)) - (setq m (memq 'nottodo conditions))) + (setq m (memq 'nottodo conditions)) + (setq m (memq 'todo conditions))) (org-agenda-skip-if-todo m end))) end))) -- 1.7.3.4