feature/native-comp c5ed3a7: * lisp/subr.el (eval-after-load): Make use of load-true-file-name bug#40638

[Andrea Corallo]

branch: feature/native-comp
commit c5ed3a72a8a70931ef9b0f9d69f73ff0fd40cadb
Author: Andrea Corallo <address@hidden>
Commit: Andrea Corallo <address@hidden>

    * lisp/subr.el (eval-after-load): Make use of load-true-file-name bug#40638
---
 lisp/subr.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/subr.el b/lisp/subr.el
index f7445d8..c8eb127 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -4600,10 +4600,10 @@ This function makes or adds to an entry on 
`after-load-alist'."
                ;; So add an indirection to make sure that `func' is really run
                ;; "after-load" in case the provide call happens early.
                (lambda ()
-                 (if (not load-file-name)
+                 (if (not load-true-file-name)
                      ;; Not being provided from a file, run func right now.
                      (funcall func)
-                   (let ((lfn load-file-name)
+                   (let ((lfn load-true-file-name)
                          ;; Don't use letrec, because equal (in
                          ;; add/remove-hook) would get trapped in a cycle.
                          (fun (make-symbol "eval-after-load-helper")))