diff options
author | Marco Wahl <marcowahlsoft@gmail.com> | 2015-09-10 13:54:28 +0200 |
---|---|---|
committer | Marco Wahl <marcowahlsoft@gmail.com> | 2015-09-10 13:54:28 +0200 |
commit | 0b71022c8cc51f3887cff5a1ec241ac258e9779c (patch) | |
tree | 2a80ed58a2213c7e434649ac0fdabc47b98c7f40 | |
parent | a4375e81c00210b4178384b75106ff2a8f0b752e (diff) | |
download | org-mode-0b71022c8cc51f3887cff5a1ec241ac258e9779c.tar.gz |
org-agenda: simplify one expression (refactoring)
* lisp/org-agenda.el (org-agenda-filter-by-category): replace '(and
cat)' with the equivalent 'cat'.
-rw-r--r-- | lisp/org-agenda.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index eff14ee..b02b2f7 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -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)) |