[Org] Rename function to save current org task to file

That.
This commit is contained in:
Daniel - 2018-11-03 10:30:47 +01:00
parent 92306694c0
commit 782dd9b8c1
Signed by: dbo
GPG Key ID: 4F63DB96D45AA9C6
2 changed files with 3 additions and 3 deletions

View File

@ -650,7 +650,7 @@ _h_ _l_ _o_k _y_ank
(use-package db-org
:commands (db/find-parent-task
db/ensure-running-clock
db/org-current-task))
db/save-current-org-task-to-file))
(use-package org
:commands (org-agenda
@ -733,7 +733,7 @@ _h_ _l_ _o_k _y_ank
(add-hook 'org-clock-out-hook #'db/ensure-running-clock 'append)
;; Communicate the currently clocked in task to the outside world
(add-hook 'org-clock-in-hook #'db/org-current-task)))
(add-hook 'org-clock-in-hook #'db/save-current-org-task-to-file)))
(use-package ox-icalendar
:commands (org-icalendar-combine-agenda-files)

View File

@ -659,7 +659,7 @@ In ~%s~:
(t
(org-clock-in '(4))))))))
(defun db/org-current-task ()
(defun db/save-current-org-task-to-file ()
"Format currently clocked task and write it to
`db/org-clock-current-task-file'."
(with-temp-file db/org-clock-current-task-file