emacs - 如何在打卡时以 org 模式自动执行任务？

Question

我使用 Emacs 组织模式来打卡上类和下类，我想在每次下类时自动执行一些特定任务。例如，我有一个将存储库推送到版本控制系统的 shell 脚本，我希望在完成工作时(即下类时)自动执行此操作。这也可以扩展到您每次打卡时(例如，每当我打卡时，我想自动打开我的电子邮件客户端)。

关于如何在我的 .emacs 文件中编写 Emacs lisp 来完成此任务的任何想法？

Answer 1

你可以编写一个函数来完成你需要做的事情，并将它添加到 org-clock-out-hook .也许是这样的(未经测试):

(defun my-on-org-clock-out ()
  (shell-command "commit-everything.sh"))

(add-hook 'org-clock-out-hook 'my-on-org-clock-out)

同样，有一个名为 org-clock-in-hook 的钩子(Hook)。 .