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:
parent
a4375e81c0
commit
0b71022c8c
|
@ -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))
|
||||
|
|
Loading…
Reference in New Issue