From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Fri, 23 Jul 2021 18:18:21 +0000 (+0200)
Subject: Fix typo in set-auto-mode--apply-alist
X-Git-Tag: emacs-28.0.90~1732^2
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=2a231378fa5b10049b52c9197f037b522e0d22a1;p=emacs.git

Fix typo in set-auto-mode--apply-alist

* lisp/files.el (set-auto-mode--apply-alist): Fix typo in
ad5faa424a5 (bug#49712).
---

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.