diff options
| -rw-r--r-- | init-el.org | 18 |
1 files changed, 10 insertions, 8 deletions
diff --git a/init-el.org b/init-el.org index 5258165..0f7cfae 100644 --- a/init-el.org +++ b/init-el.org @@ -275,7 +275,15 @@ So, to use this file for the very first time you must "to be added as advice to org-clock-in" (when +cicadas-surf-task-status-file+ (with-temp-buffer - (insert (org-clock-get-clock-string)) + (insert "👷 ") + (insert + (first + (split-string + (buffer-name (marker-buffer org-clock-marker)) + "\\."))) + (insert " -- ") + (insert org-clock-heading) + (insert " 👷") (write-file +cicadas-surf-task-status-file+)))) (defun clock-out-external-log-advice (&rest args) @@ -348,13 +356,7 @@ So, to use this file for the very first time you must (?c "table re[c]alculate" org-table-recalculate) - (?C "[C]lock" my-org-clock-command))) - - -(def-my-command my-org-clock-command - '((?c "[c]lock in" org-clock-in) - (?o "clock [o]ut" org-clock-out) - (?r "clock [r]eport" org-clock-report))) + (?C "[C]lock" org-clock-in))) (def-my-command my-org-export-subcommand '((?t "[t]angle file" org-babel-tangle) |