From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Sun, 27 Jun 2021 22:01:13 +0000 (-0400)
Subject: * lisp/files.el (hack-one-local-variable): Allow `add-function` in `eval:`
X-Git-Tag: emacs-28.0.90~2016
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9060fbd3b5cd3ccae5ef88a0204332b75af94532;p=emacs.git

* lisp/files.el (hack-one-local-variable): Allow `add-function` in `eval:`

Fixes: bug#49163
---

diff --git a/lisp/files.el b/lisp/files.el
index 5d2fe0a77be..04db0faffd0 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -4041,7 +4041,7 @@ already the major mode."
     ('eval
      (pcase val
        (`(add-hook ',hook . ,_) (hack-one-local-variable--obsolete hook)))
-     (save-excursion (eval val)))
+     (save-excursion (eval val t)))
     (_
      (hack-one-local-variable--obsolete var)
      ;; Make sure the string has no text properties.