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:28 +0100
commit41c5fe0be8ad88e15e62408182675043a73d8465 (patch)
treee6d1d91fd7b62ffa4b87e972dfcd353667f0401b
parent8f540c4db446a664089fb09b5b4a8e6c8510e114 (diff)
downloadorg-mode-41c5fe0be8ad88e15e62408182675043a73d8465.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 5ed667d..ac3fee5 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -3884,7 +3884,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
@@ -3910,7 +3909,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."