forked from mirrors/org-mode
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.
This commit is contained in:
parent
c1eff607b8
commit
8ae106907a
|
@ -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
|
||||
|
|
Loading…
Reference in a new issue