[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 8a92d00470b: * Fix missing `comp-files-queue' update (bug#63415).
From: |
Andrea Corallo |
Subject: |
master 8a92d00470b: * Fix missing `comp-files-queue' update (bug#63415). |
Date: |
Wed, 17 May 2023 10:09:46 -0400 (EDT) |
branch: master
commit 8a92d00470b7797af58c39cd9d19a913373dc50e
Author: Andrea Corallo <akrl@sdf.org>
Commit: Andrea Corallo <akrl@sdf.org>
* Fix missing `comp-files-queue' update (bug#63415).
* lisp/emacs-lisp/comp.el (native--compile-async): Update
`comp-files-queue' for real.
---
lisp/emacs-lisp/comp.el | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el
index 025d21631bb..576cd26dba7 100644
--- a/lisp/emacs-lisp/comp.el
+++ b/lisp/emacs-lisp/comp.el
@@ -4237,8 +4237,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))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 8a92d00470b: * Fix missing `comp-files-queue' update (bug#63415).,
Andrea Corallo <=