Emacs で built-in-function の定義を見る際のソースコード指定

find-func.el の find-function-C-source 関数で処理が行われている．

(defun find-function-C-source (fun-or-var file type)
  "Find the source location where FUN-OR-VAR is defined in FILE.
TYPE should be nil to find a function, or `defvar' to find a variable."
  (unless find-function-C-source-directory
    (setq find-function-C-source-directory
	  (read-directory-name "Emacs C source dir: " nil nil t)))
  (setq file (expand-file-name file find-function-C-source-directory))
;;; snip

ということで，毎回ソースコードの場所を聞かれるのが嫌であれば find-function-C-source-directory に値を設定しておけばよい．また，誤ったディレクトリを指定してしまった場合も，この変数の値を nil に設定してから，もういちど find-function-C-source を呼べばよい（Help から built-in-function のソースコードを見ようとすればよい）．