summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorAndrea Corallo <akrl@sdf.org>2023-05-17 15:28:46 +0200
committerAndrea Corallo <acorallo@gnu.org>2024-03-21 12:02:33 +0100
commit51848e4731f3e32e5d152990bf570b08ca544a92 (patch)
tree334e121ba158ec681b6e25f85f1ad2e1f6783893 /lisp/emacs-lisp
parent689f04a2ddfae856153bed762cc1461d66ec88de (diff)
downloademacs-51848e4731f3e32e5d152990bf570b08ca544a92.tar.gz
emacs-51848e4731f3e32e5d152990bf570b08ca544a92.tar.bz2
emacs-51848e4731f3e32e5d152990bf570b08ca544a92.zip
* Fix missing `comp-files-queue' update (bug#63415).
* lisp/emacs-lisp/comp.el (native--compile-async): Update `comp-files-queue' for real.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/comp.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el
index 614c62c35c6..6b65a375ea0 100644
--- a/lisp/emacs-lisp/comp.el
+++ b/lisp/emacs-lisp/comp.el
@@ -4229,8 +4229,9 @@ bytecode definition was not changed in the meantime)."
;; compilation, so update `comp-files-queue' to reflect that.
(unless (or (null load)
(eq load (cdr entry)))
- (cl-substitute (cons file load) (car entry) comp-files-queue
- :key #'car :test #'string=))
+ (setf comp-files-queue
+ (cl-substitute (cons file load) (car entry) comp-files-queue
+ :key #'car :test #'string=)))
(unless (native-compile-async-skip-p file load selector)
(let* ((out-filename (comp-el-to-eln-filename file))