case-fold-search = nil in reload-package-autoloads

Slight optimization.
This commit is contained in:
Henrik Lissner 2018-06-10 20:54:32 +02:00
parent 2d5ac8a164
commit 5295f36115
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -201,6 +201,7 @@ This should be run whenever your `doom!' block or update your packages."
(with-temp-file doom-package-autoload-file
(insert ";;; -*- lexical-binding:t -*-\n"
";; This file is autogenerated by `doom//reload-package-autoloads', DO NOT EDIT !!\n\n")
(let (case-fold-search)
(save-excursion
;; Cache the important and expensive-to-initialize state here.
(doom-initialize-packages)
@ -233,7 +234,7 @@ This should be run whenever your `doom!' block or update your packages."
(while (re-search-forward "^\\s-*\\((\\(?:add-to-list\\|\\(?:when\\|if\\) (boundp\\)\\s-+'\\(?:load-path\\|auto-mode-alist\\)\\)" nil t)
(goto-char (match-beginning 1))
(kill-sexp))
(print! (green "✓ Removed load-path/auto-mode-alist entries")))
(print! (green "✓ Removed load-path/auto-mode-alist entries"))))
(doom--byte-compile-file doom-package-autoload-file)
(when (and noninteractive (not (daemonp)))
(doom--server-load doom-package-autoload-file))