* Fix async compilation non respecting `comp-always-compile' nil value.
authorAndrea Corallo <akrl@sdf.org>
Wed, 29 Apr 2020 20:21:42 +0000 (21:21 +0100)
committerAndrea Corallo <akrl@sdf.org>
Wed, 29 Apr 2020 20:25:02 +0000 (21:25 +0100)
* lisp/emacs-lisp/comp.el (comp-run-async-workers): Fix missing
`comp-output-filename' usage.

lisp/emacs-lisp/comp.el

index 1dbafbe1ae13fc64c8ee1b928b0f5a83a0dc4dd2..05417fdc31c145511d328fa416c68717e4f604bc 100644 (file)
@@ -2196,7 +2196,8 @@ display a message."
                        "`comp-files-queue' should be \".el\" files: %s"
                        source-file)
          when (or comp-always-compile
-                  (file-newer-than-file-p source-file (concat source-file "n")))
+                  (file-newer-than-file-p source-file
+                                          (comp-output-filename source-file)))
          do (let* ((expr `(progn
                             (require 'comp)
                             (setf comp-speed ,comp-speed