exot/.emacs.d
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

[Org] Change title of all active frames when entering new task

Browse Source
This commit is contained in:
Daniel Borchmann 2019-12-05 17:09:49 +01:00
parent 4fa4a3bd68
commit 2bc02703eb
Signed by: exot
GPG Key ID: 1C7071A75BB72D64
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
site-lisp/db-org.el
View File

@ -309,12 +309,13 @@ In ~%s~:
(insert org-clock-heading)))))
(defun db/org-update-frame-title-with-current-clock ()
"Set the frametitle of the current frame to the headline of the
"Set the title of all active frames to the headline of the
current task."
(interactive)
(let ((clock-buffer (marker-buffer org-clock-marker)))
(when clock-buffer
(modify-frame-parameters nil `((name . , org-clock-heading))))))
(dolist (frame (frame-list))
(modify-frame-parameters frame `((name . , org-clock-heading)))))))
;;; Fixes