Commit | Line | Data |
---|---|---|
0a10297a | 1 | ;;; patcomp.el --- used by patch files to update Emacs releases -*- no-byte-compile: t -*- |
e85c9f90 | 2 | |
60370d40 PJ |
3 | ;; This file is part of GNU Emacs. |
4 | ||
2a1e2476 | 5 | ;; Obsolete-since: 24.3 |
3c74813a | 6 | |
60370d40 PJ |
7 | ;;; Commentary: |
8 | ||
9 | ;;; Code: | |
10 | ||
e85c9f90 RS |
11 | (defun batch-byte-recompile-emacs () |
12 | "Recompile the Emacs `lisp' directory. | |
13 | This is used after installing the patches for a new version." | |
14 | (let ((load-path (list (expand-file-name "lisp")))) | |
15 | (byte-recompile-directory "lisp"))) | |
af8eb50d RS |
16 | |
17 | (defun batch-byte-compile-emacs () | |
18 | "Compile new files installed in the Emacs `lisp' directory. | |
19 | This is used after installing the patches for a new version. | |
20 | It uses the command line arguments to specify the files to compile." | |
21 | (let ((load-path (list (expand-file-name "lisp")))) | |
22 | (batch-byte-compile))) | |
60370d40 PJ |
23 | |
24 | ;;; patcomp.el ends here |