Отслеживание гибкого рабочего времени с помощью Emacs (& org-mode)

Итак, на работе мы используем гибкое время (гибкие часы, гибкие часы ...), что приятно, но может быть трудно отслеживать. В настоящее время я использую org-mode для отслеживания своих часов ( org-clock-(out|in)), но я хотел бы расширить его, чтобы он автоматически вычислял, если я работал более 8 часов. часов (лишнее время должно быть добавлено к моему «счету» гибкого времени) или меньше (в зависимости от того, как долго я взял обеденный перерыв и т. д.), баланс на моем «счете» гибкого времени и тому подобное.

Кто-нибудь еще использует для этого Emacs?

В настоящее время я использую очень простую настройку для отслеживания своего времени:

(defun check-in ()
  (interactive)
  (let (pbuf (current-buffer))
    (find-file (convert-standard-filename "whatnot"))
    (goto-char (point-max))
    (insert "\n")
    (org-insert-heading)
    (org-insert-time-stamp (current-time))
    (org-clock-in)
    (save-buffer)
    (switch-to-buffer pbuf)))

(defun check-out ()
  (interactive)
  (let (pbuf (current-buffer))
    (find-file (convert-standard-filename "whatnot"))
    (goto-char (point-max))
    (org-clock-out)
    (save-buffer)
    (switch-to-buffer pbuf)))