1 ;;; patcomp.el --- used by patch files to update Emacs releases -*- no-byte-compile: t -*-
3 ;; This file is part of GNU Emacs.
5 ;; Obsolete-since: 24.3
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")))
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)))
24 ;;; patcomp.el ends here