emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] master b4b1c3d: Use jka-compr-load-suffixes instead of hardcoded


From: Michael Heerdegen
Subject: [elpa] master b4b1c3d: Use jka-compr-load-suffixes instead of hardcoded suffixes
Date: Thu, 22 Dec 2016 17:25:53 +0000 (UTC)

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

    Use jka-compr-load-suffixes instead of hardcoded suffixes
---
 packages/el-search/el-search.el |    5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

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



reply via email to

[Prev in Thread] Current Thread [Next in Thread]