summaryrefslogtreecommitdiff
path: root/lisp/cedet/semantic
diff options
context:
space:
mode:
authorMattias EngdegÄrd <mattiase@acm.org>2020-04-16 11:27:43 +0200
committerMattias EngdegÄrd <mattiase@acm.org>2020-04-16 12:14:38 +0200
commit7839390f271211882414f167e8e680b3154ee929 (patch)
treef6774161712b6fb9913e904cb84833ef3433c8c0 /lisp/cedet/semantic
parent905c0a13f7929298cb36151f46dbef03f7bdcbe4 (diff)
downloademacs-7839390f271211882414f167e8e680b3154ee929.tar.gz
Quote semanticdb-ebrowse-default-file-name in regexp
Noticed by Andreas Schwab. * lisp/cedet/semantic/db-ebrowse.el (semanticdb-load-ebrowse-caches): Quote file name in regexp.
Diffstat (limited to 'lisp/cedet/semantic')
-rw-r--r--lisp/cedet/semantic/db-ebrowse.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/cedet/semantic/db-ebrowse.el b/lisp/cedet/semantic/db-ebrowse.el
index 6262efb5b8f..d63e5bc4869 100644
--- a/lisp/cedet/semantic/db-ebrowse.el
+++ b/lisp/cedet/semantic/db-ebrowse.el
@@ -181,7 +181,8 @@ is specified by `semanticdb-default-save-directory'."
"Load all semanticdb controlled EBROWSE caches."
(interactive)
(let ((f (directory-files semanticdb-default-save-directory
- t (concat semanticdb-ebrowse-default-file-name
+ t (concat (regexp-quote
+ semanticdb-ebrowse-default-file-name)
"-load\\.el\\'")
t)))
(while f