diff options
| author | Phillip Lord | 2017-01-13 13:57:51 +0000 |
|---|---|---|
| committer | Phillip Lord | 2017-01-13 21:28:43 +0000 |
| commit | 72c668a9042ac6475eadedfee5c87fb1e6b2d753 (patch) | |
| tree | 43b38784e70c216d6f4703fa23a40008a375a703 /admin | |
| parent | 502390822f9c0068898ae41285b37568bf0e4d1c (diff) | |
| download | emacs-72c668a9042ac6475eadedfee5c87fb1e6b2d753.tar.gz emacs-72c668a9042ac6475eadedfee5c87fb1e6b2d753.zip | |
Record autoloads till emacs dump
* admin/ldefs-clean.el (ldefs-clean-up): Record autoloads till emacs dump
* lisp/ldefs-boot-auto.el (batch-byte-compile): Update
Previously, autoloads were collected till loaddefs.el was generated as
part of the build. However, bootstrap-emacs does not load
loaddefs (rather it is dumped), hence we must record autoloads until the
full emacs binary is dumped.
Diffstat (limited to 'admin')
| -rw-r--r-- | admin/ldefs-clean.el | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/admin/ldefs-clean.el b/admin/ldefs-clean.el index 6eabe57c7e4..c227a163604 100644 --- a/admin/ldefs-clean.el +++ b/admin/ldefs-clean.el | |||
| @@ -37,9 +37,11 @@ | |||
| 37 | "Clean up output from build and turn it into ldefs-boot-auto.el." | 37 | "Clean up output from build and turn it into ldefs-boot-auto.el." |
| 38 | (interactive) | 38 | (interactive) |
| 39 | (goto-char (point-max)) | 39 | (goto-char (point-max)) |
| 40 | ;; We only need the autoloads up till loaddefs.el is | 40 | ;; We need to record autoloads till the point that emacs (as opposed |
| 41 | ;; generated. After this, ldefs-boot.el is not needed | 41 | ;; to bootstrap-emacs) is dumped. After this point, we are not |
| 42 | (search-backward " GEN loaddefs.el") | 42 | ;; bootstrapping any more. |
| 43 | (search-backward "-l loadup dump") | ||
| 44 | (beginning-of-line) | ||
| 43 | (delete-region (point) (point-max)) | 45 | (delete-region (point) (point-max)) |
| 44 | (keep-lines "(autoload" (point-min) (point-max)) | 46 | (keep-lines "(autoload" (point-min) (point-max)) |
| 45 | (sort-lines nil (point-min) (point-max)) | 47 | (sort-lines nil (point-min) (point-max)) |