diff options
| author | Stefan Monnier | 2009-09-15 03:45:51 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2009-09-15 03:45:51 +0000 |
| commit | 428b13d63c9041a71b06b6add5eeeed4b3c7ceaa (patch) | |
| tree | dfc295bb567ead1e0f30cb3b8e3c5518445cc02d /src/lread.c | |
| parent | 838ff458025f7d59d5f9485363e9834f5a5dc063 (diff) | |
| download | emacs-428b13d63c9041a71b06b6add5eeeed4b3c7ceaa.tar.gz emacs-428b13d63c9041a71b06b6add5eeeed4b3c7ceaa.zip | |
(Fload): Also run do-after-load-evaluation while dumping.
Diffstat (limited to 'src/lread.c')
| -rw-r--r-- | src/lread.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/lread.c b/src/lread.c index 92b1b432acd..19b6c05143b 100644 --- a/src/lread.c +++ b/src/lread.c | |||
| @@ -1279,8 +1279,7 @@ Return t if the file exists and loads successfully. */) | |||
| 1279 | unbind_to (count, Qnil); | 1279 | unbind_to (count, Qnil); |
| 1280 | 1280 | ||
| 1281 | /* Run any eval-after-load forms for this file */ | 1281 | /* Run any eval-after-load forms for this file */ |
| 1282 | if (NILP (Vpurify_flag) | 1282 | if (!NILP (Ffboundp (Qdo_after_load_evaluation))) |
| 1283 | && (!NILP (Ffboundp (Qdo_after_load_evaluation)))) | ||
| 1284 | call1 (Qdo_after_load_evaluation, hist_file_name) ; | 1283 | call1 (Qdo_after_load_evaluation, hist_file_name) ; |
| 1285 | 1284 | ||
| 1286 | UNGCPRO; | 1285 | UNGCPRO; |