forked from mirrors/org-mode
org-agenda.el (org-agenda-redo): Reapply the filters correctly
* org-agenda.el (org-agenda-redo): Reapply the filters correctly. TINYCHANGE
This commit is contained in:
parent
58e45f4df1
commit
445a8ec66e
|
@ -7287,9 +7287,12 @@ in the agenda."
|
|||
(put 'org-agenda-tag-filter :preset-filter tag-preset)
|
||||
(put 'org-agenda-category-filter :preset-filter cat-preset)
|
||||
(put 'org-agenda-regexp-filter :preset-filter re-preset)
|
||||
(and (or tag-filter tag-preset) (org-agenda-filter-apply tag-filter 'tag))
|
||||
(and (or cat-filter cat-preset) (org-agenda-filter-apply cat-filter 'category))
|
||||
(and (or re-filter re-preset) (org-agenda-filter-apply re-filter 'regexp))
|
||||
(let ((tag (or tag-filter tag-preset))
|
||||
(cat (or cat-filter cat-preset))
|
||||
(re (or re-filter re-preset)))
|
||||
(when tag (org-agenda-filter-apply tag 'tag))
|
||||
(when cat (org-agenda-filter-apply cat 'category))
|
||||
(when re (org-agenda-filter-apply re 'regexp)))
|
||||
(and top-hl-filter (org-agenda-filter-top-headline-apply top-hl-filter))
|
||||
(and cols (org-called-interactively-p 'any) (org-agenda-columns))
|
||||
(org-goto-line line)
|
||||
|
|
Loading…
Reference in New Issue