uwabami: モードラインのダイエット (1/n)

モードラインのダイエット (1/n)

元ネタ:

• Emacs - 指定したマイナーモードを表示しない - Qiita
• mode-lineのモード情報をコンパクトに表示する - Life is very short

というわけで, 現在設定中…

DDSKKのモード表示

SKK の ON/OFF や入力モードを切り替える度にモードラインがピョコピョコと動いてちょっと煩わしい とりあえず安直に advice かけてみたり．

(defadvice skk-make-indicator-alist
    (after my:set-skk-default-indicator activate)
  (dolist (elem
           '((abbrev " [aA]" . "--[aA]:")
             (latin " [_A]" . "--[_A]:")
             (default " [--]" . "--[--]:")))
    (setq ad-return-value
          (append (cons elem nil)
                  (delq (assoc (car elem) ad-return-value) ad-return-value)))))

本来は face の設定もある筈なのであまり良くないが，そもそも face は設定していないから，とりあえず良しとする．

でも，skk を一回は ON にしないと駄目っぽいなぁ．find-file-hooks あたりに hook かけたら良いのだろうか?