org-agenda: simplify one expression (refactoring)

* lisp/org-agenda.el (org-agenda-filter-by-category): replace '(and
  cat)' with the equivalent 'cat'.
This commit is contained in:
Marco Wahl 2015-09-10 13:54:28 +02:00
parent a4375e81c0
commit 0b71022c8c
1 changed files with 1 additions and 1 deletions

View File

@ -7366,7 +7366,7 @@ With a prefix argument, exclude the lines of that category.
((and cat strip)
(org-agenda-filter-apply
(push (concat "-" cat) org-agenda-category-filter) 'category))
((and cat)
(cat
(org-agenda-filter-apply
(setq org-agenda-category-filter
(list (concat "+" cat))) 'category))