summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/bytecomp.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2021-02-27 12:28:17 -0500
committerStefan Monnier <monnier@iro.umontreal.ca>2021-02-27 12:28:17 -0500
commit082b431e62b5d1f835149874df95941268c8a763 (patch)
treea108a1059dcc3e4db0b3ea45ee28f02b2796e974 /lisp/emacs-lisp/bytecomp.el
parent2c639a35a6d71d190bea896bbeb14b279e8d8384 (diff)
downloademacs-082b431e62b5d1f835149874df95941268c8a763.tar.gz
emacs-082b431e62b5d1f835149874df95941268c8a763.tar.bz2
emacs-082b431e62b5d1f835149874df95941268c8a763.zip
* lisp/emacs-lisp/bytecomp.el: Fix minor regression introduced by pdump
After `rm **/*.elc; make` we'd sometimes get loads and loads of unnecessary "Reloading ...". (byte-compile-refresh-preloaded): Don't reload files that are more recent than `temacs` but older than the `.pdmp` file.
Diffstat (limited to 'lisp/emacs-lisp/bytecomp.el')
-rw-r--r--lisp/emacs-lisp/bytecomp.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index f85979579ff..a2fe37a1ee5 100644
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -5225,8 +5225,9 @@ already up-to-date."
"Reload any Lisp file that was changed since Emacs was dumped.
Use with caution."
(let* ((argv0 (car command-line-args))
- (emacs-file (executable-find argv0)))
- (if (not (and emacs-file (file-executable-p emacs-file)))
+ (emacs-file (or (cdr (nth 2 (pdumper-stats)))
+ (executable-find argv0))))
+ (if (not (and emacs-file (file-exists-p emacs-file)))
(message "Can't find %s to refresh preloaded Lisp files" argv0)
(dolist (f (reverse load-history))
(setq f (car f))