patcomp.el 723 B

12345678910111213141516171819202122232425
  1. ;;; patcomp.el --- used by patch files to update Emacs releases
  2. ;; This file is part of GNU Emacs.
  3. ;; Obsolete-since: 24.3
  4. ;;; Commentary:
  5. ;;; Code:
  6. (defun batch-byte-recompile-emacs ()
  7. "Recompile the Emacs `lisp' directory.
  8. This is used after installing the patches for a new version."
  9. (let ((load-path (list (expand-file-name "lisp"))))
  10. (byte-recompile-directory "lisp")))
  11. (defun batch-byte-compile-emacs ()
  12. "Compile new files installed in the Emacs `lisp' directory.
  13. This is used after installing the patches for a new version.
  14. It uses the command line arguments to specify the files to compile."
  15. (let ((load-path (list (expand-file-name "lisp"))))
  16. (batch-byte-compile)))
  17. ;;; patcomp.el ends here