(eval-after-load): Call load-symbol-file-load-history to

ensure that eval-after-load works for files dumped with Emacs.

2 files changed, 10 insertions, 0 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 2c5f67361ba..f4e7912766e 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,12 @@
 2001-01-11  Gerd Moellmann  <gerd@gnu.org>
 
+        * subr.el (eval-after-load): Call load-symbol-file-load-history to
+        ensure that eval-after-load works for files dumped with Emacs.
+
+        * help.el (load-symbol-file-load-history): New function extracted
+        from function symbol-file.
+        (symbol-file): Use it.
+
         * toolbar/save.xpm, toolbar/undo.xpm: Use the same colors as
         exit.xpm.
 
diff --git a/lisp/subr.el b/lisp/subr.el
index 2dc159a3424..3a60e15b0e5 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -804,6 +804,9 @@ It does nothing if FORM is already on the list for FILE.
 FILE must match exactly.  Normally FILE is the name of a library,
 with no directory or extension specified, since that is how `load'
 is normally called."
+  ;; Make sure `load-history' contains the files dumped with Emacs
+  ;; for the case that FILE is one of the files dumped with Emacs.
+  (load-symbol-file-load-history)
   ;; Make sure there is an element for FILE.
   (or (assoc file after-load-alist)
       (setq after-load-alist (cons (list file) after-load-alist)))