aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorAndreas Politz2017-03-04 05:58:34 +0100
committerNoam Postavsky2017-05-20 18:28:23 -0400
commitf151eb01418b80d102c767566e93ac332a8bf7c3 (patch)
treee007692be8f9e80745a19097deb0e908fd0c3ce0
parent848c90e3d43ed7baebab5f2d02d0a9601c6a142b (diff)
downloademacs-f151eb01418b80d102c767566e93ac332a8bf7c3.tar.gz
emacs-f151eb01418b80d102c767566e93ac332a8bf7c3.zip
Don't save unrelated buffers before recompiling directory (Bug#25964)
* lisp/emacs-lisp/bytecomp.el (byte-recompile-directory): Only save buffers visiting lisp files under the directory being compiled.
-rw-r--r--lisp/emacs-lisp/bytecomp.el7
1 files changed, 6 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index e716eef10ad..6c12e5d8e25 100644
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -1659,7 +1659,12 @@ that already has a `.elc' file."
1659 (if arg (setq arg (prefix-numeric-value arg))) 1659 (if arg (setq arg (prefix-numeric-value arg)))
1660 (if noninteractive 1660 (if noninteractive
1661 nil 1661 nil
1662 (save-some-buffers) 1662 (save-some-buffers
1663 nil (lambda ()
1664 (let ((file (buffer-file-name)))
1665 (and file
1666 (string-match-p emacs-lisp-file-regexp file)
1667 (file-in-directory-p file directory)))))
1663 (force-mode-line-update)) 1668 (force-mode-line-update))
1664 (with-current-buffer (get-buffer-create byte-compile-log-buffer) 1669 (with-current-buffer (get-buffer-create byte-compile-log-buffer)
1665 (setq default-directory (expand-file-name directory)) 1670 (setq default-directory (expand-file-name directory))