summaryrefslogtreecommitdiff
path: root/lisp/files.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/files.el')
-rw-r--r--lisp/files.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/files.el b/lisp/files.el
index dc803d3a4cf..c0effd1ad6b 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -3221,7 +3221,7 @@ call is via directory-locals and extra checks should be done."
(if case-insensitive-p
;; Filesystem is case-insensitive.
(let ((case-fold-search t))
- (assoc-default alist 'string-match))
+ (assoc-default name alist 'string-match))
;; Filesystem is case-sensitive.
(or
;; First match case-sensitively.