ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/org-agenda.el
View File

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