diff options
author | Sacha Chua <sacha@sachachua.com> | 2022-11-03 18:41:22 -0400 |
---|---|---|
committer | Sacha Chua <sacha@sachachua.com> | 2022-11-03 18:41:22 -0400 |
commit | c36261caaff9305d256c616edcc9d1fdb51b1b42 (patch) | |
tree | db26ab46121d26442002dd8d4b190d8a8393dae9 /emacsconf.el | |
parent | 3cce90093797c7524cecff94df35b4b8253f91fa (diff) | |
download | emacsconf-el-c36261caaff9305d256c616edcc9d1fdb51b1b42.tar.xz emacsconf-el-c36261caaff9305d256c616edcc9d1fdb51b1b42.zip |
Change hooks to pass the talk variable
Diffstat (limited to 'emacsconf.el')
-rw-r--r-- | emacsconf.el | 13 |
1 files changed, 8 insertions, 5 deletions
diff --git a/emacsconf.el b/emacsconf.el index 219c9ed..1b2d81e 100644 --- a/emacsconf.el +++ b/emacsconf.el @@ -1119,16 +1119,19 @@ Filter by TRACK if given. Use INFO as the list of talks." (defvar emacsconf-todo-hooks '( - emacsconf-stream-play-talk-org-after-todo-state-change ;; play the talk + emacsconf-stream-play-talk-on-change ;; play the talk ;; emacsconf-erc-org-after-todo-state-change ;; announce via ERC - ;; emacsconf-publish-backstage-org-after-todo-state-change ;; update the backstage index - emacsconf-stream-update-talk-info-org-after-todo-state-change ;; write to the talk text + emacsconf-publish-bbb-redirect + emacsconf-publish-backstage-org-on-state-change ;; update the backstage index + emacsconf-stream-update-talk-on-change ;; write to the talk text ) - "Functions to run when the todo state changes.") + "Functions to run when the todo state changes. +They will be called with TALK.") (defun emacsconf-org-after-todo-state-change () "Run all the hooks in `emacsconf-todo-hooks'." - (run-hooks 'emacsconf-todo-hooks)) + (let ((talk (emacsconf-get-talk-info-for-subtree))) + (run-hook-with-args 'emacsconf-todo-hooks talk))) (defun emacsconf-broadcast (message) (interactive "MMessage: ") |