summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBastien <bzg@gnu.org>2020-02-17 00:45:13 +0100
committerBastien <bzg@gnu.org>2020-02-17 00:45:13 +0100
commitdfa7a3397b8fac37a5f9e6a71b37c260c308cf6a (patch)
treecdcceda781d51d8564e878bc5b41f436e21a7987
parent8f6ce817d80f891108d85606de356806a55ac81c (diff)
downloadorg-mode-dfa7a3397b8fac37a5f9e6a71b37c260c308cf6a.tar.gz
org-agenda.el: Fix call to `org-agenda-finalize-hook'
* lisp/org-agenda.el (org-agenda-finalize): Run functions in `org-agenda-finalize-hook' at the very end.
-rw-r--r--lisp/org-agenda.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index ec12710..a78b98a 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -3901,7 +3901,6 @@ FILTER-ALIST is an alist of filters we need to apply when
'tags
(org-with-point-at mrk
(mapcar #'downcase (org-get-tags)))))))))
- (run-hooks 'org-agenda-finalize-hook)
(setq org-agenda-represented-tags nil
org-agenda-represented-categories nil)
(when org-agenda-top-headline-filter
@@ -3927,7 +3926,8 @@ FILTER-ALIST is an alist of filters we need to apply when
(when (get 'org-agenda-effort-filter :preset-filter)
(org-agenda-filter-apply
(get 'org-agenda-effort-filter :preset-filter) 'effort))
- (add-hook 'kill-buffer-hook 'org-agenda-reset-markers 'append 'local)))))
+ (add-hook 'kill-buffer-hook 'org-agenda-reset-markers 'append 'local)
+ (run-hooks 'org-agenda-finalize-hook)))))
(defun org-agenda-mark-clocking-task ()
"Mark the current clock entry in the agenda if it is present."