From: Kira Bruneau <kira.bruneau@gmail.com>
Date: Thu, 4 Aug 2022 06:26:38 +0000 (+0200)
Subject: Fix ignored-local-variable-values for non-primitive values
X-Git-Tag: emacs-29.0.90~1447^2~484
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3e60f7f3c31a8491b085684121e5229be56b3538;p=emacs.git

Fix ignored-local-variable-values for non-primitive values

* lisp/files.el (hack-local-variables-filter): Fix
`ignored-local-variable-values' for non-primitive values (bug#56957).
---

diff --git a/lisp/files.el b/lisp/files.el
index 5df19661936..e258bf7bbed 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -3848,10 +3848,8 @@ DIR-NAME is the name of the associated directory.  Otherwise it is nil."
 	(cond ((memq var ignored-local-variables)
 	       ;; Ignore any variable in `ignored-local-variables'.
 	       nil)
-              ((seq-some (lambda (elem)
-                           (and (eq (car elem) var)
-                                (eq (cdr elem) val)))
-                         ignored-local-variable-values)
+              ;; Ignore variables with the specified values.
+              ((member elt ignored-local-variable-values)
                nil)
 	      ;; Obey `enable-local-eval'.
 	      ((eq var 'eval)