emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

emacs-29 51848e4731f: * Fix missing `comp-files-queue' update (bug#63415


From: Andrea Corallo
Subject: emacs-29 51848e4731f: * Fix missing `comp-files-queue' update (bug#63415).
Date: Thu, 21 Mar 2024 07:04:24 -0400 (EDT)

branch: emacs-29
commit 51848e4731f3e32e5d152990bf570b08ca544a92
Author: Andrea Corallo <akrl@sdf.org>
Commit: Andrea Corallo <acorallo@gnu.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 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))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]