procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Output progress messages when scraping autoloads during bootstrap

Browse source 
* lisp/emacs-lisp/byte-run.el (byte-compile-info-message): New
function to outout informational messages during byte compilation.

* lisp/emacs-lisp/autoload.el (update-directory-autoloads): Use it
to report progress when scraping autoloads during bootstrap (which
may take half a minute).
This commit is contained in:
Lars Ingebrigtsen 2019-06-18 01:05:58 +02:00
parent 8b8280ac7f
commit 56a90c4234
2 changed files with 9 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/emacs-lisp/autoload.el
View file

@ -1061,6 +1061,7 @@ write its autoloads into the specified file instead."
;; Files with no autoload cookies or whose autoloads go to other
;; files because of file-local autoload-generated-file settings.
(no-autoloads nil)
(file-count 0)
(autoload-modified-buffers nil)
(generated-autoload-file
(if (called-interactively-p 'interactive)
@ -1126,6 +1127,10 @@ write its autoloads into the specified file instead."
;; Elements remaining in FILES have no existing autoload sections yet.
(let ((no-autoloads-time (or last-time '(0 0 0 0))) file-time)
(dolist (file files)
(setq file-count (1+ file-count))
(when (zerop (mod file-count 100))
(byte-compile-info-message "Scraped autoloads from %d files"
file-count))
(cond
;; Passing nil as second argument forces
;; autoload-generate-file-autoloads to look for the right