emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Refactor doom-cli--generate-autoloads

Browse source
This commit is contained in:
Henrik Lissner 2019-12-30 17:06:49 -05:00
parent 497a6a206e
commit 0b1ab39a00
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
1 changed files with 26 additions and 26 deletions
Download patch file Download diff file Expand all files Collapse all files

10
core/cli/autoloads.el
View file

@ -219,13 +219,13 @@ it is nil, it will try to reload both."
(defun doom-cli--generate-autoloads (files &optional scan)
(require 'autoload)
(let (autoloads)
(dolist (file files (delq nil (nreverse autoloads)))
(and (file-readable-p file)
(dolist (file
(cl-remove-if-not #'file-readable-p files)
(nreverse (delq nil autoloads)))
(with-temp-buffer
(save-excursion
(if scan
(doom-cli--generate-autoloads-buffer file)
(insert-file-contents-literally file)))
(insert-file-contents-literally file))
(save-excursion
(let ((filestr (prin1-to-string file)))
(while (re-search-forward "\\_<load-file-name\\_>" nil t)
@ -244,4 +244,4 @@ it is nil, it will try to reload both."
(push (doom-cli--filter-form (read (current-buffer))
scan)
autoloads))
(end-of-file))))))))
(end-of-file)))))))