Mercurial > emacs
changeset 105028:77cce41847d5
(Fload): Also run do-after-load-evaluation while dumping.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Tue, 15 Sep 2009 03:45:51 +0000 |
| parents | 8cbad31101f6 |
| children | 4859f3f9f0dc |
| files | src/ChangeLog src/lread.c |
| diffstat | 2 files changed, 5 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/src/ChangeLog Tue Sep 15 03:39:40 2009 +0000 +++ b/src/ChangeLog Tue Sep 15 03:45:51 2009 +0000 @@ -1,3 +1,7 @@ +2009-09-15 Stefan Monnier <monnier@iro.umontreal.ca> + + * lread.c (Fload): Also run do-after-load-evaluation while dumping. + 2009-09-12 Stefan Monnier <monnier@iro.umontreal.ca> * lread.c (Fload): Don't output a message after loading an obsolete
--- a/src/lread.c Tue Sep 15 03:39:40 2009 +0000 +++ b/src/lread.c Tue Sep 15 03:45:51 2009 +0000 @@ -1279,8 +1279,7 @@ unbind_to (count, Qnil); /* Run any eval-after-load forms for this file */ - if (NILP (Vpurify_flag) - && (!NILP (Ffboundp (Qdo_after_load_evaluation)))) + if (!NILP (Ffboundp (Qdo_after_load_evaluation))) call1 (Qdo_after_load_evaluation, hist_file_name) ; UNGCPRO;