Well I just went ahead and wrote the hack anyway and it seems to work for me, here is what I did:
;; show clock and timer stuff in the frame title (defvar plain-frame-title-format frame-title-format) (defun clock-in-frame-title () (if (org-clocking-p) (setq frame-title-format (list (concat (car plain-frame-title-format) " :: Clocked in: " (org-clock-get-clock-string) " :: Pomodoro:" org-timer-mode-line-string))) (setq frame-title-format plain-frame-title-format))) (run-at-time t 1 'clock-in-frame-title) (add-hook 'org-clock-in-hook 'clock-in-frame-title) (add-hook 'org-clock-out-hook 'clock-in-frame-title) (add-hook 'org-clock-cancel-hook 'clock-in-frame-title) Any comments? Is run-at-time the best thing to use here? Note that I use the Pomodoro method and use the code to start the Pomodoro that was posted to this list previously: http://orgmode.org/worg/org-gtd-etc.html Borbus.