[elpa] master 18b6414: Use regexp-opt on suffixes in el-search--elisp-file-name-p

[Michael Heerdegen]

branch: master
commit 18b6414d3e40c91f15ee8b3bfecfe7f660267a21
Author: Michael Heerdegen <address@hidden>
Commit: Michael Heerdegen <address@hidden>

    Use regexp-opt on suffixes in el-search--elisp-file-name-p
---
 packages/el-search/el-search.el |    5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

diff --git a/packages/el-search/el-search.el b/packages/el-search/el-search.el
index e2cbfaa..c7812a7 100644
--- a/packages/el-search/el-search.el
+++ b/packages/el-search/el-search.el
@@ -827,10 +827,7 @@ MESSAGE are used to construct the error message."
              type arg))))
 
 (defun el-search--elisp-file-name-p (file)
-  (and (string-match-p (concat "\\.el\\("
-                               (mapconcat #'identity jka-compr-load-suffixes 
"\\|")
-                               "\\)?\\'")
-                       file)
+  (and (string-match-p (concat "\\.el" (regexp-opt jka-compr-load-suffixes) 
"?\\'") file)
        (file-exists-p file)
        (not (file-directory-p file))))