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

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

This commit is contained in:
Daniel - 2019-12-05 17:09:49 +01:00
parent 4fa4a3bd68
commit 2bc02703eb
No known key found for this signature in database
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