diff options
| author | Richard M. Stallman | 2005-01-12 05:03:22 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2005-01-12 05:03:22 +0000 |
| commit | 5ba8f83ded4394bf48a034330181edb50638526a (patch) | |
| tree | 6b8c2da3606f02f3e38f2478964990a020f65fcc /src | |
| parent | 1b8d07559d30c3ce3229f7119ee9f06177ec8224 (diff) | |
| download | emacs-5ba8f83ded4394bf48a034330181edb50638526a.tar.gz emacs-5ba8f83ded4394bf48a034330181edb50638526a.zip | |
(Frequire): Record in load-history unconditionally.
Diffstat (limited to 'src')
| -rw-r--r-- | src/fns.c | 6 |
1 files changed, 4 insertions, 2 deletions
| @@ -3443,6 +3443,10 @@ The normal messages at start and end of loading FILENAME are suppressed. */) | |||
| 3443 | 3443 | ||
| 3444 | CHECK_SYMBOL (feature); | 3444 | CHECK_SYMBOL (feature); |
| 3445 | 3445 | ||
| 3446 | /* Record the presence of `require' in this file | ||
| 3447 | even if the feature specified is already loaded. */ | ||
| 3448 | LOADHIST_ATTACH (Fcons (Qrequire, feature)); | ||
| 3449 | |||
| 3446 | tem = Fmemq (feature, Vfeatures); | 3450 | tem = Fmemq (feature, Vfeatures); |
| 3447 | 3451 | ||
| 3448 | if (NILP (tem)) | 3452 | if (NILP (tem)) |
| @@ -3450,8 +3454,6 @@ The normal messages at start and end of loading FILENAME are suppressed. */) | |||
| 3450 | int count = SPECPDL_INDEX (); | 3454 | int count = SPECPDL_INDEX (); |
| 3451 | int nesting = 0; | 3455 | int nesting = 0; |
| 3452 | 3456 | ||
| 3453 | LOADHIST_ATTACH (Fcons (Qrequire, feature)); | ||
| 3454 | |||
| 3455 | /* This is to make sure that loadup.el gives a clear picture | 3457 | /* This is to make sure that loadup.el gives a clear picture |
| 3456 | of what files are preloaded and when. */ | 3458 | of what files are preloaded and when. */ |
| 3457 | if (! NILP (Vpurify_flag)) | 3459 | if (! NILP (Vpurify_flag)) |