diff options
| author | Raúl Benencia <id@rbenencia.name> | 2025-12-28 10:18:52 -0300 |
|---|---|---|
| committer | Raúl Benencia <id@rbenencia.name> | 2025-12-28 10:18:52 -0300 |
| commit | 01c9e3cb02b0ddafb12279fe0132bc2151508d05 (patch) | |
| tree | 33c628d30cae5c4ccdc59dad06b8fd331a1e3d5d | |
| parent | 0bde0f0a415c5db51a70bccf0e641fd6a9cb7312 (diff) | |
allow to manually reset sessions
| -rw-r--r-- | org-tempus.el | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/org-tempus.el b/org-tempus.el index 458e9c6..191ff92 100644 --- a/org-tempus.el +++ b/org-tempus.el @@ -220,6 +220,16 @@ Known providers are `emacs' (activity inside Emacs), "Return clocked time for current task as a duration string." (org-duration-from-minutes (org-clock-get-clocked-time))) +(defun org-tempus-reset-session () + "Reset the current session timer." + (interactive) + (setq org-tempus--session-threshold-notified nil) + (if (org-clock-is-active) + (setq org-tempus--session-start-time (current-time)) + (setq org-tempus--session-start-time nil)) + (org-tempus--update-mode-line) + (message "Org Tempus session reset.")) + (defun org-tempus--update-session-start () "Update session start time. Keep a short task change within the same session." (when org-clock-start-time |