mirror/org-mode
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-12-03 08:30:03 +00:00
Code

Merge branch 'maint'

Browse Source
This commit is contained in:
Bastien Guerry 2013-11-05 19:42:24 +01:00
commit c6381df127
1 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
lisp/org-agenda.el
View File

@ -7530,9 +7530,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