Commit | Line | Data |
---|---|---|
be010748 | 1 | ;;; bytecpat.el --- do recompilation for Emacs patch files. |
d45bfadf RS |
2 | ;;; This function is used by the patch files to update Emacs releases. |
3 | ||
4 | (defun batch-byte-recompile-emacs () | |
5 | "Recompile the Emacs `lisp' directory. | |
6 | This is used after installing the patches for a new version." | |
7 | (let ((load-path (list (expand-file-name "lisp")))) | |
8 | (byte-recompile-directory "lisp"))) | |
9 | ||
10 | (defun batch-byte-compile-emacs () | |
11 | "Compile new files installed in the Emacs `lisp' directory. | |
12 | This is used after installing the patches for a new version. | |
13 | It uses the command line arguments to specify the files to compile." | |
14 | (let ((load-path (list (expand-file-name "lisp")))) | |
15 | (batch-byte-compile))) |