re-search-forward to search-forward when no re

When no regular expression is present, it's faster and simpler to use
search-forward

Signed-off-by: Rudi Grinberg <rudi.grinberg@gmail.com>
This commit is contained in:
Rudi Grinberg 2019-10-13 12:25:41 +09:00
parent 90b59d00df
commit 55e00bbd26
4 changed files with 4 additions and 4 deletions

View file

@ -139,7 +139,7 @@ was installed with."
(when (file-readable-p file)
(insert-file-contents file)
(delay-mode-hooks (emacs-lisp-mode))
(while (re-search-forward "(package! " nil t)
(while (search-forward "(package! " nil t)
(save-excursion
(goto-char (match-beginning 0))
(unless (let ((ppss (syntax-ppss)))