Emacs で空気が読めないおっ母をもの分かりのいいおっ父にする

カーソル位置の単語を自動補完して *Occur* バッファのカーソル行をハイライトするカスタマイズ版 occur を otto と名づけてみた(をい)。

(add-hook 'occur-mode-hook 'hl-line-mode)

(defun otto ()
  (interactive)
  (occur (thing-at-point 'symbol)))

それにしてもいろんなとこに汎用的に使える hl-line-mode と thing-at-point はすごい。マイブームを引き起こしてマス。