Show current timer task in header line

(require 'org)
(require 'org-timer)
(require 'cl-lib)

(defvar my/org-timer-current-task nil)

(defun my/org-timer-start-hook ()
  (setq my/org-timer-current-task (nth 4 (org-heading-components)))
  (cl-loop for buf in (buffer-list)
           unless (string-match-p "\\`[[:space:]*]" (buffer-name buf))
           do
           (with-current-buffer buf
             (setq-local header-line-format '((" " my/org-timer-current-task " ")))))
  (setq-default header-line-format '((" " my/org-timer-current-task " "))))

(defun my/org-timer-end-hook ()
  (cl-loop for buf in (buffer-list)
           do
           (setq header-line-format nil))
  (setq-default header-line-format nil))

(dolist (hook '(org-timer-set-hook))
  (add-hook hook #'my/org-timer-start-hook))

(dolist (hook '(org-timer-done-hook org-timer-cancel-hook))
  (add-hook hook #'my/org-timer-end-hook))

Demo

表示されなくなった通知エリアの Dropboxのアイコンを表示させる

だいぶ前からだけど, Dropboxのアイコンが表示されなくなっていた(左から二つめのアイコン). ずっと意味不明なアイコンが表示されているなぁと思っていたけど, 何のアイコンかわからなかったので放置していました. で, 今日 Dropboxということに気づいてそれなら出しておいた方がいいかということで対策を調査しました.

修正方法

原因はよくわかっていませんが, 環境変数 DBUS_SESSION_BUS_ADDRESSを空文字列すると解決するとのことです. 起動スクリプトなり, /usr/bin/dropboxを直に書き換えるなりして, 環境変数を変更するようにし, Dropboxを再起動すると無事アイコンが表示されました(再起動に伴い位置が左端になってしまいましたが...)

quickrun supports gnuplot

github.com

quickrun.el supports Gnuplot file. You can see output of plot as image in other buffer.

NOTE: This mode is supported only for GUI Emacs.

Please report me if you have any problems or suggestions.

emacs-jp slack

https://slack-emacs-jp.herokuapp.com/

参加したい方はこちらからどうぞ.

fluentd-mode

tagomoris.hatenablog.com

昔なんとなく書いたものを apache-modeを参考に改善しました.

github.com

問題点, 要望等ありましたら github issuesまで知らせていだけると大変助かります.

inline image in markdown-mode

github.com

I have implemented inline image feature in markdown-mode. You can see image file in buffer by M-x markdown-toggle-inline-images command. This command is bound to C-c C-i C-t by default. You cannot use this feature in no GUI Emacs like emacs -nw.

Please report us via github issues if you have any issues.

Thanks for using markdown-mode.

Data::MessagePack 0.49_01 released

https://metacpan.org/release/SYOHEX/Data-MessagePack-0.49_01

I have released Data::MessagePack 0.49_01. This version support Str/Bin type which is new types in new MessagePack specification.

Please report me via github issues if you have any issues.