From 1e73d2bbc3ce635928ddd234d16ac9332460aa72 Mon Sep 17 00:00:00 2001 From: Bastien Guerry Date: Fri, 10 Aug 2012 10:08:58 +0200 Subject: [PATCH] =?UTF-8?q?org-agenda.el=20(org-agenda-switch-to):=20Run?= =?UTF-8?q?=20hooks=20in=20=CC=80org-agenda-after-show-hook'?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit * org-agenda.el (org-agenda-switch-to): Run hooks in ̀org-agenda-after-show-hook'. Thanks to Jack Erwin for suggesting this. --- lisp/org-agenda.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index a70e9683c..09e5eaba7 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -7512,7 +7512,8 @@ at the text of the entry itself." (and (outline-next-heading) (org-flag-heading nil))) ; show the next heading (when (outline-invisible-p) - (show-entry)))))) ; display invisible text + (show-entry)) ; display invisible text + (run-hooks 'org-agenda-after-show-hook))))) (defun org-agenda-goto-mouse (ev) "Go to the Org-mode file which contains the item at the mouse click."