org-agenda.el (org-agenda-redo): Set filters after agenda has been redone

* org-agenda.el (org-agenda-redo): Set filters after agenda
has been redone.
This commit is contained in:
Bastien Guerry 2013-03-19 13:30:11 +01:00
parent ecb9e5811d
commit c8a3425559
1 changed files with 6 additions and 1 deletions

View File

@ -7214,13 +7214,18 @@ in the agenda."
(series-redo-cmd (get-text-property p 'org-series-redo-cmd)))
(put 'org-agenda-tag-filter :preset-filter nil)
(put 'org-agenda-category-filter :preset-filter nil)
(put 'org-agenda-regexp-filter :preset-filter nil)
(and cols (org-columns-quit))
(message "Rebuilding agenda buffer...")
(if series-redo-cmd
(eval series-redo-cmd)
(org-let lprops '(eval redo-cmd)))
(setq org-agenda-undo-list nil
org-agenda-pending-undo-list nil)
org-agenda-pending-undo-list nil
org-agenda-tag-filter tag-filter
org-agenda-category-filter cat-filter
org-agenda-regexp-filter re-filter
org-agenda-top-category-filter top-cat-filter)
(message "Rebuilding agenda buffer...done")
(put 'org-agenda-tag-filter :preset-filter tag-preset)
(put 'org-agenda-category-filter :preset-filter cat-preset)