From 422717d17bf62d24e977ce728fe9d50abaa96a13 Mon Sep 17 00:00:00 2001 From: Gerd Moellmann Date: Thu, 11 Jan 2001 14:24:02 +0000 Subject: [PATCH] (eval-after-load): Call load-symbol-file-load-history to ensure that eval-after-load works for files dumped with Emacs. --- lisp/ChangeLog | 7 +++++++ lisp/subr.el | 3 +++ 2 files changed, 10 insertions(+) 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 + * 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))) -- 2.39.5