Mercurial > emacs

view lisp/patcomp.el @ 15190:dc5aa17e7910

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merged cosmetic differences between FSF version and local copy. In the future, diffmon will make this unnecessary. (save-place-version): new var; init to 1.4. (save-place-limit): init to nil.
author Karl Fogel <kfogel@red-bean.com>
date Wed, 08 May 1996 20:02:29 +0000
parents de27224b0b43
children bd56cdc4d07b
line wrap: on
line source

;;; This function is used by the patch files to update Emacs releases.

(defun batch-byte-recompile-emacs ()
  "Recompile the Emacs `lisp' directory.
This is used after installing the patches for a new version."
  (let ((load-path (list (expand-file-name "lisp"))))
    (byte-recompile-directory "lisp")))

(defun batch-byte-compile-emacs ()
  "Compile new files installed in the Emacs `lisp' directory.
This is used after installing the patches for a new version.
It uses the command line arguments to specify the files to compile."
  (let ((load-path (list (expand-file-name "lisp"))))
    (batch-byte-compile)))