mirror of
https://github.com/doomemacs/doomemacs
synced 2025-08-01 12:17:25 -05:00
Remove (provide ...) forms from package autoloads
This commit is contained in:
@ -509,7 +509,7 @@ This should be run whenever your `doom!' block or update your packages."
|
|||||||
(when (file-exists-p file)
|
(when (file-exists-p file)
|
||||||
(insert "(let ((load-file-name " (prin1-to-string (abbreviate-file-name file)) "))\n")
|
(insert "(let ((load-file-name " (prin1-to-string (abbreviate-file-name file)) "))\n")
|
||||||
(insert-file-contents file)
|
(insert-file-contents file)
|
||||||
(while (re-search-forward "^\\(?:;;\\(.*\n\\)\\|\n\\)" nil t)
|
(while (re-search-forward "^\\(?:;;\\(.*\n\\)\\|\n\\|(provide '[^\n]+\\)" nil t)
|
||||||
(unless (nth 8 (syntax-ppss))
|
(unless (nth 8 (syntax-ppss))
|
||||||
(replace-match "" t t)))
|
(replace-match "" t t)))
|
||||||
(unless (bolp) (insert "\n"))
|
(unless (bolp) (insert "\n"))
|
||||||
|
Reference in New Issue
Block a user