Browse Source

org-agenda.el (org-agenda-switch-to): Run hooks in ̀org-agenda-after-show-hook'

* org-agenda.el (org-agenda-switch-to): Run hooks in
̀org-agenda-after-show-hook'.

Thanks to Jack Erwin for suggesting this.
Bastien Guerry 7 years ago
parent
commit
1e73d2bbc3
1 changed files with 2 additions and 1 deletions
  1. 2 1
      lisp/org-agenda.el

+ 2 - 1
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."