[elpa] externals/el-search 788db9d 135/332: Use regexp-opt on suffixes in el-search--elisp-file-name-p

[Stefan Monnier]

branch: externals/el-search
commit 788db9d65fc4130e2e50a138d1c2df4ba9213ebb
Author: Michael Heerdegen <michael_heerdegen@web.de>
Commit: Michael Heerdegen <michael_heerdegen@web.de>

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

diff --git a/el-search.el b/el-search.el
index e2cbfaa..c7812a7 100644
--- a/el-search.el
+++ b/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))))