From 3e60f7f3c31a8491b085684121e5229be56b3538 Mon Sep 17 00:00:00 2001 From: Kira Bruneau Date: Thu, 4 Aug 2022 08:26:38 +0200 Subject: 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). --- lisp/files.el | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) (limited to 'lisp/files.el') 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) -- cgit v1.2.3