emacs - elispでディレクトリを強制的にバイトコンパイルする方法

Question

elispソースで何も気にせずにディレクトリを強制的にバイトコンパイルするにはどうすればよいですか(インタラクティブなものと同じですC-u 0 M-x byte-recompile-directoryが、ソースでは)?

次のようなものを書く必要があります：

(defun byte-compile-directory-recursively (directory)
  (dolist (file (directory-files directory t "\\w+"))
    (if (file-directory-p file)
        (byte-compile-directory-recursively file)
      (if (string-match "\\.el$" file)
          (byte-compile-file file)))))

? どんな助けでも大歓迎です。

Answer 1

を探していると思います(byte-recompile-directory directory 0)。