From 8ae106907af2b43f6b5f8cd1bb8753d28bf56afc Mon Sep 17 00:00:00 2001 From: Bastien Guerry Date: Tue, 5 Nov 2013 19:41:41 +0100 Subject: [PATCH] org-agenda.el (org-agenda-filter-make-matcher): Fix regression * org-agenda.el (org-agenda-filter-make-matcher): When filtering tags and hitting space, filter out entries with tags, only keep those without tags. Thanks to Serguei Son for reporting this regression. --- lisp/org-agenda.el | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index bd19cc504..16f1b4d78 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -7529,9 +7529,11 @@ to switch to narrowing." (if notgroup (push (cons 'and nf0) f) (push (cons (or op 'or) nf0) f))))) - (if (equal nfilter filter) - (funcall ffunc f1 f filter t nil) - (funcall ffunc nf1 nf nfilter nil nil))))) + (cond ((equal filter '("+")) + (setq f (list (list 'not 'tags)))) + ((equal nfilter filter) + (funcall ffunc f1 f filter t nil)) + (t (funcall ffunc nf1 nf nfilter nil nil)))))) ;; Category filter ((eq type 'category) (setq filter -- 2.11.4.GIT