Explicitly set frame title when current Org task changes

This should enable new frames to show the correct title, and not just the
default "emacs" string.
This commit is contained in:
Daniel - 2021-10-16 12:21:02 +02:00
parent 6277e0b104
commit c17bc4c1ab
No known key found for this signature in database
GPG Key ID: 1C7071A75BB72D64
1 changed files with 2 additions and 1 deletions

View File

@ -365,8 +365,9 @@ tag PERIODIC."
(interactive)
(let ((clock-buffer (marker-buffer org-clock-marker)))
(when clock-buffer
(setq frame-title-format org-clock-heading)
(dolist (frame (frame-list))
(modify-frame-parameters frame `((name . , org-clock-heading)))))))
(modify-frame-parameters frame `((name . ,org-clock-heading)))))))
(defun db/show-current-org-task ()
"Show title of currently clock in task in modeline."