normal-top-level-add-subdirs-to-load-path

新しくインストールしたelispにいちいちパスを通すのが面倒だから、
init.elに

(defun add-to-load-path (&rest paths)
  (let (path)
    (dolist (path paths paths)
      (let ((default-directory
              (expand-file-name (concat user-emacs-directory path))))
        (add-to-list 'load-path default-directory)
        (if (fboundp 'normal-top-level-add-subdirs-to-load-path)
            (normal-top-level-add-subdirs-to-load-path))))))

みたいな事を書いてる。

(add-to-load-path "elisp")

みたいな事をすれば、elisp以下にある全てのディレクトリを再帰的にたどってパスを通してくれる。
.nosearchっていうファイルがあるフォルダは無視してくれるって事を今日知ったからメモる。

Emacs講座 -第6回- load-path / マスタカの ChangeLog メモ