将clocking计时显示在头部

Action · 2019 年7 月 7 日 16:40

开始计时任务后, doom-emacs, 会在右下角显示

Screenshot%20from%202019-07-08%2000-37-41

放在这里, 相当不会引起注意.

怎样将 [0:00] 这个放到frame的头部.

casouri · 2019 年7 月 8 日 01:03

可以放在window的header line？

Action · 2019 年7 月 8 日 03:08

显示在这里

是purcell的配置purcell/emacs.d: An Emacs configuration bundle with batteries included

Nasy · 2019 年7 月 8 日 04:08

拜托，乃都知道是谁的了，乃就不能找找别人的代码吗？

github.com

purcell/emacs.d/blob/9bb862b3d5f95d66506693cf1ebc685bb79d1080/lisp/init-org.el#L312-L334


      
          (defun sanityinc/show-org-clock-in-header-line ()
            (setq-default header-line-format '((" " org-mode-line-string " "))))
          
          
(defun sanityinc/hide-org-clock-from-header-line ()
            (setq-default header-line-format nil))
          
          
(add-hook 'org-clock-in-hook 'sanityinc/show-org-clock-in-header-line)
          (add-hook 'org-clock-out-hook 'sanityinc/hide-org-clock-from-header-line)
          (add-hook 'org-clock-cancel-hook 'sanityinc/hide-org-clock-from-header-line)
          
          
(after-load 'org-clock
            (define-key org-clock-mode-line-map [header-line mouse-2] 'org-clock-goto)
            (define-key org-clock-mode-line-map [header-line mouse-1] 'org-clock-menu))
          
          

          

          
(when (and *is-a-mac* (file-directory-p "/Applications/org-clock-statusbar.app"))
            (add-hook 'org-clock-in-hook
                      (lambda () (call-process "/usr/bin/osascript" nil 0 nil "-e"
                                          (concat "tell application \"org-clock-statusbar\" to clock in \"" org-clock-current-task "\""))))

This file has been truncated. show original

Action · 2019 年7 月 8 日 04:16

问题可以当 activity log用.

cnsunyour · 2019 年7 月 8 日 05:58

大概这哥们儿就希望别人把问题解决了，他只要粘代码就行了

Action · 2019 年7 月 8 日 06:11

你的图片跟文字挤在一行里了, 调整一下.